Re: [O] [PATCH] ox-s5: Update to work with refactored html backedn

[Nicolas Goaziou]

Hello,

Łukasz Stelmach  writes:

> * 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.

Applied. Thank you.

Regards,

-- 
Nicolas Goaziou

[O] [PATCH] ox-s5: Update to work with refactored html backedn

[Łukasz Stelmach]

* 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

Re: [O] [PATCH] ox-s5: update to work with refactored html backedn

[Łukasz Stelmach]

It was <2017-05-04 czw 17:39>, when Łukasz Stelmach wrote:
> * contrib/lisp/ox-s5.el: adapt to changes introduced by c9ca0b6d in the
> way :html-divs/org-html-divs are passed to ox-html

Please don't apply this patch. I'll send it from another e-mail account.
-- 
Łukasz Stelmach
Samsung R Institute Poland
Samsung Electronics

[O] [PATCH] ox-s5: update to work with refactored html backedn

[Łukasz Stelmach]

* contrib/lisp/ox-s5.el: adapt to changes introduced by c9ca0b6d in the
way :html-divs/org-html-divs are passed to ox-html
---
It appears that for some reason the patch didn't make it to the list the
first time I sent it.

 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