浏览代码

babel: ob-emacs-lisp now wraps body in a progn on execute

Eric Schulte 15 年之前
父节点
当前提交
6a1f5b2bcb
共有 1 个文件被更改,包括 2 次插入1 次删除
  1. 2 1
      contrib/babel/lisp/langs/org-babel-emacs-lisp.el

+ 2 - 1
contrib/babel/lisp/langs/org-babel-emacs-lisp.el

@@ -62,7 +62,8 @@
   (save-window-excursion
     (let ((processed-params (org-babel-process-params params)))
       (org-babel-reassemble-table
-       (eval (read (org-babel-expand-body:emacs-lisp body params)))
+       (eval (read (format "(progn %s)"
+			   (org-babel-expand-body:emacs-lisp body params))))
        (org-babel-pick-name (nth 4 processed-params) (cdr (assoc :colnames params)))
        (org-babel-pick-name (nth 5 processed-params) (cdr (assoc :rownames params)))))))