* 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.
---
 contrib/lisp/ox-s5.el | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

diff --git a/contrib/lisp/ox-s5.el b/contrib/lisp/ox-s5.el
index 503bfd0..7a717fe 100644
--- a/contrib/lisp/ox-s5.el
+++ b/contrib/lisp/ox-s5.el
@@ -304,13 +304,13 @@ 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 (plist-get info :html-container) "li")
+                             (append '((content "ol" "content")) org-s5--divs)
+                           org-s5--divs))))
     (mapconcat
      'identity
      (list
-- 
2.1.4


Reply via email to