mirror of https://github.com/yjwen/org-reveal.git
Merge branch 'master' of https://github.com/jmhammond/org-reveal into jmhammond-master
This commit is contained in:
commit
2cfaee9b49
12
ox-reveal.el
12
ox-reveal.el
|
@ -959,6 +959,17 @@ Extract and set `attr_html' to plain-list tag attributes."
|
||||||
tag
|
tag
|
||||||
)))
|
)))
|
||||||
|
|
||||||
|
(defun org-reveal--insert-bibliography (&optional ignore)
|
||||||
|
"Create a slide for the bibliography from org-ref, if it exists"
|
||||||
|
(if (fboundp 'org-ref-get-html-bibliography)
|
||||||
|
(progn
|
||||||
|
;; here we could employ other bibliographic engines
|
||||||
|
(fset 'bibliography 'org-ref-get-html-bibliography)
|
||||||
|
(when (funcall 'bibliography)
|
||||||
|
(concat "<section>"
|
||||||
|
(funcall 'bibliography)
|
||||||
|
"</section>")))))
|
||||||
|
|
||||||
(defun org-reveal--build-pre/postamble (type info)
|
(defun org-reveal--build-pre/postamble (type info)
|
||||||
"Return document preamble or postamble as a string, or nil."
|
"Return document preamble or postamble as a string, or nil."
|
||||||
(let ((section (plist-get info (intern (format ":reveal-%s" type))))
|
(let ((section (plist-get info (intern (format ":reveal-%s" type))))
|
||||||
|
@ -1155,6 +1166,7 @@ info is a plist holding export options."
|
||||||
(when footer (format "<div class=\"slide-footer\">%s</div>\n" footer))))
|
(when footer (format "<div class=\"slide-footer\">%s</div>\n" footer))))
|
||||||
"</section>\n"))))
|
"</section>\n"))))
|
||||||
contents
|
contents
|
||||||
|
(org-reveal--insert-bibliography)
|
||||||
"</div>
|
"</div>
|
||||||
</div>\n"
|
</div>\n"
|
||||||
(org-reveal--build-pre/postamble 'postamble info)
|
(org-reveal--build-pre/postamble 'postamble info)
|
||||||
|
|
Loading…
Reference in New Issue