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:
parent
250b64b3cb
commit
a4f29410e9
|
@ -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
|
||||
|
|
Loading…
Reference in New Issue