summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDan Davison <davison@stats.ox.ac.uk>2010-10-08 18:35:39 +0100
committerDan Davison <davison@stats.ox.ac.uk>2010-10-08 18:35:39 +0100
commit3afc34a10b7d5769d550ab807c7fee697cdd4133 (patch)
tree51f68d9c7f1deaa7578afd0ad2634bf7f320beb7
parent63e4b4528e404aed1ef88cfd3419e20a990cbd91 (diff)
downloadorg-mode-3afc34a10b7d5769d550ab807c7fee697cdd4133.tar.gz
babel: Remove protective commas from Org code
-rw-r--r--lisp/ob-org.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/ob-org.el b/lisp/ob-org.el
index 40ff8a0..8b45de8 100644
--- a/lisp/ob-org.el
+++ b/lisp/ob-org.el
@@ -47,7 +47,8 @@
(defun org-babel-execute:org (body params)
"Execute a block of Org code with.
This function is called by `org-babel-execute-src-block'."
- (let ((result-params (split-string (or (cdr (assoc :results params)) ""))))
+ (let ((result-params (split-string (or (cdr (assoc :results params)) "")))
+ (body (replace-regexp-in-string "^," "" body)))
(cond
((member "latex" result-params) (org-babel-org-export body "latex"))
((member "html" result-params) (org-babel-org-export body "html"))