浏览代码

babel: Remove protective commas from Org code

Dan Davison 14 年之前
父节点
当前提交
3afc34a10b
共有 1 个文件被更改,包括 2 次插入1 次删除
  1. 2 1
      lisp/ob-org.el

+ 2 - 1
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"))