emacs
/
org-reveal
mirror of https://github.com/yjwen/org-reveal.git
1
0
Fork 0
Code Issues Releases Wiki Activity

add custom theme capability

This commit is contained in:
Elsa Gonsiorowski (Pluto) 2022-06-20 10:15:28 +03:00
parent c2ffe99f95
commit c484226a64
1 changed files with 7 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
ox-reveal.el
View File

@ -60,6 +60,7 @@
(:reveal-trans "REVEAL_TRANS" nil nil t)
(:reveal-speed "REVEAL_SPEED" nil nil t)
(:reveal-theme "REVEAL_THEME" nil org-reveal-theme t)
(:reveal-theme-custom "REVEAL_THEME_CUSTOM" nil nil nil)
(:reveal-extra-css "REVEAL_EXTRA_CSS" nil org-reveal-extra-css newline)
(:reveal-extra-js "REVEAL_EXTRA_JS" nil org-reveal-extra-js nil)
(:reveal-extra-initial-js "REVEAL_EXTRA_INITIAL_JS" nil org-reveal-extra-initial-js newline)
@ -638,10 +639,12 @@ using custom variable `org-reveal-root'."
(version (org-reveal--get-reveal-js-version info))
(reveal-css (org-reveal--choose-path root-path version "dist/reveal.css" "css/reveal.css"))
(theme (plist-get info :reveal-theme))
(theme-css (org-reveal--choose-path root-path
version
(concat "dist/theme/" theme ".css")
(concat "css/theme/" theme ".css")))
(theme-css (if (string-equal "custom" (downcase theme))
(plist-get info :reveal-theme-custom)
(org-reveal--choose-path root-path
version
(concat "dist/theme/" theme ".css")
(concat "css/theme/" theme ".css"))))
(extra-css (plist-get info :reveal-extra-css))
(in-single-file (plist-get info :reveal-single-file)))
(concat