ox-s5: Update to work with refactored HTML backend

* contrib/lisp/ox-s5.el (org-s5-template): Adapt to changes introduced
by c9ca0b6d in the way :html-divs/org-html-divs are passed to ox-html.
This commit is contained in:
Łukasz Stelmach 2017-05-04 20:01:44 +02:00 committed by Nicolas Goaziou
parent 250b64b3cb
commit a4f29410e9
1 changed files with 8 additions and 6 deletions

View File

@ -304,13 +304,15 @@ holding export options."
"Return complete document string after HTML conversion.
CONTENTS is the transcoded contents string. INFO is a plist
holding export options."
(let ((org-html-divs
(if (equal (plist-get info :html-container) "li")
(append '((content "ol" "content")) org-s5--divs)
org-s5--divs))
(info (plist-put
(let ((info (plist-put
(plist-put
(plist-put info :html-preamble (plist-get info :s5-preamble))
:html-postamble (plist-get info :s5-postamble))))
:html-postamble
(plist-get info :s5-postamble))
:html-divs
(if (equal "li" (plist-get info :html-container))
(cons '(content "ol" "content") org-s5--divs)
org-s5--divs))))
(mapconcat
'identity
(list