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

add defcustoms for klipsification 

User now decides whether or not to klipsify in a defcustom.
This commit is contained in:
Matt Price 2016-12-11 11:37:52 -05:00
parent e6bb3e376e
commit 2a4ca5941c
1 changed files with 16 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

17
ox-reveal.el
View File

@ -371,6 +371,21 @@ BEFORE the plugins that depend on them."
:group 'org-export-reveal
:type 'string)
(defcustom org-reveal-klipsify-src nil
"Set to non-nil if you would like to make source code blocks editable in exported presentation."
:group 'org-export-reveal
:type 'boolean)
(defcustom org-reveal-klipse-css "https://storage.googleapis.com/app.klipse.tech/css/codemirror.css"
"Location of the codemirror css file for use with klipse."
:group 'org-export-reveal
:type 'string)
(defcustom org-reveal-klipse-css "https://storage.googleapis.com/app.klipse.tech/js/klipse_plugin.js"
"location of the klipse js source code."
:group 'org-export-reveal
:type 'string)
(defvar org-reveal--last-slide-section-tag ""
"Variable to cache the section tag from the last slide. ")
@ -995,7 +1010,7 @@ contextual information."
(label (let ((lbl (org-element-property :name src-block)))
(if (not lbl) ""
(format " id=\"%s\"" lbl))))
(klipsify (and (assoc 'klipse org-reveal-external-plugins)
(klipsify (and org-reveal-klipsify-src ;;(assoc 'klipse org-reveal-external-plugins)
(member lang '("javascript" "ruby" "scheme" "clojure" "php"))))
(langselector (cond ((string= lang "javascript") "selector_eval_js")
((string= lang "clojure") "selector")