diff --git a/ox-reveal.el b/ox-reveal.el index 473e9b0..a4ee4a0 100644 --- a/ox-reveal.el +++ b/ox-reveal.el @@ -997,6 +997,12 @@ contextual information." (format " id=\"%s\"" lbl)))) (klipsify (and (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") + ((string= lang "python") "selector_eval_python_client") + ((string= lang "scheme") "selector_eval_scheme") + ((string= lang "ruby") "selector_eval_ruby")) + ) ;;(klipse-hidden (if (assoc 'klipse org-reveal-external-plugins) " style=\"display:hidden;\"") nil) ) (if (not lang) @@ -1004,6 +1010,7 @@ contextual information." (or (frag-class frag info) " class=\"example\"") label code) + (cond ((eq lang "javascript "))) (format "
\n%s%s\n
%s" (if klipsify "style=\"display:none;\" " "") @@ -1019,8 +1026,22 @@ contextual information." (format " class=\"src src-%s\"" lang)) label code) ) - (if klipsify (format "%s" - lang code) "")))))) + ;; (if klipsify (format "%s" + ;; lang code) "") + (if klipsify (concat "") "") ))))) (defun org-reveal-quote-block (quote-block contents info) "Transcode a QUOTE-BLOCK element from Org to Reveal.