ob-emacs-lisp: now supports :results output

* lisp/ob-emacs-lisp.el (org-babel-execute:emacs-lisp): Now supports
  ":results output".
This commit is contained in:
Eric Schulte 2011-04-10 16:29:14 -06:00
parent 92b603c892
commit 2c8e964b70

View file

@ -57,7 +57,10 @@
"Execute a block of emacs-lisp code with Babel."
(save-window-excursion
(org-babel-reassemble-table
(eval (read (format "(progn %s)"
(eval (read (format (if (member "output"
(cdr (assoc :result-params params)))
"(with-output-to-string %s)"
"(progn %s)")
(org-babel-expand-body:emacs-lisp body params))))
(org-babel-pick-name (cdr (assoc :colname-names params))
(cdr (assoc :colnames params)))