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 - "
%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)))))))
+ "%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.