trying out org-reveal and ox-spectacle

This commit is contained in:
Chris Cochrun 2022-12-13 09:33:14 -06:00
parent e300da588f
commit 59fc0e0bf3
2 changed files with 51 additions and 4 deletions

View file

@ -616,6 +616,10 @@ Let's start by creating a self contained function of what I'd like started on ev
(evil-normal-state) (evil-normal-state)
(setq visual-fill-column-width 120 (setq visual-fill-column-width 120
visual-fill-column-center-text t)) visual-fill-column-center-text t))
(defun chris/org-mpv (url)
(interactive)
(bongo-insert-uri url (format "%s ==> %s" title url)))
#+end_src #+end_src
This is the use-package definition with a lot of customization. Need to setup auto tangle and make sure I have some structure templates for org-mode. This is the use-package definition with a lot of customization. Need to setup auto tangle and make sure I have some structure templates for org-mode.
@ -1170,6 +1174,31 @@ If on a:
(org-display-inline-images t t beg end) (org-display-inline-images t t beg end)
t))) t)))
#+end_src #+end_src
*** Org Reveal
Org reveal allows me to create beautiful and powerful slideshows using the incredible reveal.js system. Whilst I hate the web making so much into terrible things, I do really like reveal.js. It's honestly a much better picture of what javascript can do than apps like Facebook.
So, how do we use this? Well, let's try like this.
#+begin_src emacs-lisp
(use-package org-re-reveal
:ensure nil
:config
(setq org-re-reveal-root "file:///home/chris/org/presentations/reveal.js/"
org-re-reveal-theme "serif"
org-re-reveal-transition "slide"
org-re-reveal-mobile-app t)
)
#+end_src
*** Ox-Spectacle
Spectacle.js is another beautiful slideshow builder that org can export to using ox-spectacle.
#+begin_src emacs-lisp
(use-package ox-spectacle
:config
)
#+end_src
** Emoji ** Emoji
In order to render color emojis I'll use =unicode-fonts=. In order to render color emojis I'll use =unicode-fonts=.
#+begin_src emacs-lisp #+begin_src emacs-lisp
@ -2830,7 +2859,7 @@ Let's add our own eshell prompt. and set the password cache to a significantly h
(format (format
(propertize "\n[ %s | %s@%s ]" 'face font-lock-comment-face) (propertize "\n[ %s | %s@%s ]" 'face font-lock-comment-face)
(propertize root 'face `(:inherit org-warning)) (propertize root 'face `(:inherit org-warning))
(propertize after-root 'face `(:inherit org-level-1)) (propertize after-root 'face `(:inherit org-level-1 :height 1.0))
(propertize (or (magit-get-current-branch) (magit-get-current-tag)) 'face `(:inherit org-macro)))) (propertize (or (magit-get-current-branch) (magit-get-current-tag)) 'face `(:inherit org-macro))))
(format (format
(propertize "\n[%s]" 'face font-lock-comment-face) (propertize "\n[%s]" 'face font-lock-comment-face)
@ -3211,7 +3240,7 @@ Since Bongo seems kinda difficult I shall give EMMS another try.
:config :config
(emms-all) (emms-all)
(evil-collection-emms-setup) (evil-collection-emms-setup)
(emms-default-players) (setq emms-player-list '(emms-player-vlc))
(setq emms-source-file-default-directory "~/Music/" (setq emms-source-file-default-directory "~/Music/"
emms-tag-editor-tag-ogg-program "mid3v2") emms-tag-editor-tag-ogg-program "mid3v2")

22
init.el
View file

@ -352,6 +352,10 @@
(setq visual-fill-column-width 120 (setq visual-fill-column-width 120
visual-fill-column-center-text t)) visual-fill-column-center-text t))
(defun chris/org-mpv (url)
(interactive)
(bongo-insert-uri url (format "%s ==> %s" title url)))
(use-package org (use-package org
:defer 1 :defer 1
:config :config
@ -844,6 +848,20 @@ If on a:
(org-display-inline-images t t beg end) (org-display-inline-images t t beg end)
t))) t)))
(use-package org-re-reveal
:ensure nil
:config
(setq org-re-reveal-root "file:///home/chris/org/presentations/reveal.js/"
org-re-reveal-theme "serif"
org-re-reveal-transition "slide"
org-re-reveal-mobile-app t)
)
(use-package ox-spectacle
:config
)
(use-package unicode-fonts (use-package unicode-fonts
:ensure t :ensure t
:config :config
@ -1952,7 +1970,7 @@ targets."
(format (format
(propertize "\n[ %s | %s@%s ]" 'face font-lock-comment-face) (propertize "\n[ %s | %s@%s ]" 'face font-lock-comment-face)
(propertize root 'face `(:inherit org-warning)) (propertize root 'face `(:inherit org-warning))
(propertize after-root 'face `(:inherit org-level-1)) (propertize after-root 'face `(:inherit org-level-1 :height 1.0))
(propertize (or (magit-get-current-branch) (magit-get-current-tag)) 'face `(:inherit org-macro)))) (propertize (or (magit-get-current-branch) (magit-get-current-tag)) 'face `(:inherit org-macro))))
(format (format
(propertize "\n[%s]" 'face font-lock-comment-face) (propertize "\n[%s]" 'face font-lock-comment-face)
@ -2292,7 +2310,7 @@ interfere with the default `bongo-playlist-buffer'."
:config :config
(emms-all) (emms-all)
(evil-collection-emms-setup) (evil-collection-emms-setup)
(emms-default-players) (setq emms-player-list '(emms-player-vlc))
(setq emms-source-file-default-directory "~/Music/" (setq emms-source-file-default-directory "~/Music/"
emms-tag-editor-tag-ogg-program "mid3v2") emms-tag-editor-tag-ogg-program "mid3v2")