Include the org-ref bibliography at the end of the slides.

This commit is contained in:
John Hammond 2018-07-26 18:48:11 -05:00
parent 1cdd088ec5
commit 03594e02b3
1 changed files with 8 additions and 0 deletions

View File

@ -962,6 +962,13 @@ Extract and set `attr_html' to plain-list tag attributes."
tag
)))
(defun org-reveal--insert-bibliography (&optional ignore)
"Create a slide for the bibliography from org-ref"
(concat "<section>"
(funcall 'org-ref-get-html-bibliography)
"</section>"
))
(defun org-reveal--build-pre/postamble (type info)
"Return document preamble or postamble as a string, or nil."
(let ((section (plist-get info (intern (format ":reveal-%s" type))))
@ -1158,6 +1165,7 @@ info is a plist holding export options."
(when footer (format "<div class=\"slide-footer\">%s</div>\n" footer))))
"</section>\n"))))
contents
(org-reveal--insert-bibliography)
"</div>
</div>\n"
(org-reveal--build-pre/postamble 'postamble info)