[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.
TINYCHANGE
---
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
source
(cond
((assoc :wrap (nth 2 info))
(let ((name (or (cdr (assoc :wrap (nth 2 info))) "RESULTS")))
- (funcall wrap (concat "#+BEGIN_" name) (concat "#+END_"
name))))
+ (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)
--
1.7.9