diff --git a/ox-reveal.el b/ox-reveal.el index ab940c2..fcd3be7 100644 --- a/ox-reveal.el +++ b/ox-reveal.el @@ -1007,11 +1007,10 @@ contextual information." ((string= lang "scheme") "selector_eval_scheme") ((string= lang "ruby") "selector_eval_ruby") ((string= lang "html") "selector_eval_html")) - ) -) + )) (if (not lang) - (format "
\n%s
" - (or (frag-class src-block info) " class=\"example\"")) + (format "
\n%s
" + (or (frag-class src-block info) " class=\"example\"") label code) (if klipsify @@ -1040,18 +1039,18 @@ window.klipse_settings = { " langselector ": \".klipse\" }; '> ") (format - "
\n%s%s\n
" - (if (not caption) "" - (format "" - (org-export-data caption info))) - (if use-highlight - (format "\n%s" - (or (frag-class src-block info) "") - label lang code-attribs code) - (format "\n
%s
" - (or (frag-class src-block info) - (format " class=\"src src-%s\"" lang)) - label code))))))) + "
\n%s%s\n
" + (if (not caption) "" + (format "" + (org-export-data caption info))) + (if use-highlight + (format "\n%s" + (or (frag-class src-block info) "") + label lang code-attribs code) + (format "\n
%s
" + (or (frag-class src-block info) + (format " class=\"src src-%s\"" lang)) + label code)))))))) (defun org-reveal-quote-block (quote-block contents info) "Transcode a QUOTE-BLOCK element from Org to Reveal.