[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[O] [PATCH] Babel: Fix the #+END_ directive f rom the :wrap param

From: Michael Gauland
Subject: [O] [PATCH] Babel: Fix the #+END_ directive f rom the :wrap param
Date: Wed, 5 Dec 2012 21:27:38 +0000 (UTC)
User-agent: Loom/3.14 (http://gmane.org/)

* lisp/ob.el: Only use the :wrap argument up to the first space when creating
  the #+END_ directive.

Using an option like ":wrap SRC fundamental" was generating and end marker of
"#+END_SRC fundamental", which caused the new exporter to fail to handle to
block properly.

 lisp/ob.el |    3 ++-
 1 files changed, 2 insertions(+), 1 deletions(-)
 mode change 100644 => 100755 lisp/ob.el

diff --git a/lisp/ob.el b/lisp/ob.el
old mode 100644
new mode 100755
index c030a7f..563233e
--- a/lisp/ob.el
+++ b/lisp/ob.el
@@ -1997,7 +1997,8 @@ code ---- the results are extracted in the syntax of the
                 ((assoc :wrap (nth 2 info))
                  (let ((name (or (cdr (assoc :wrap (nth 2 info))) "RESULTS")))
-                   (funcall wrap (concat "#+BEGIN_" name) (concat "#+END_" 
+                   (funcall wrap (concat "#+BEGIN_" name) 
+                            (concat "#+END_" (car (split-string name))))))
                 ((member "html" result-params)
                  (funcall wrap "#+BEGIN_HTML" "#+END_HTML"))
                 ((member "latex" result-params)

reply via email to

[Prev in Thread] Current Thread [Next in Thread]