tec/org-mode
tec/org-mode
1
0
Fork 0
forked from mirrors/org-mode
Code Pull requests Releases Activity

ob-lisp: re-arrange order of function nesting in lisp execution function

Browse source 
* lisp/ob-lisp.el (org-babel-execute:lisp): No real functional change,
  just aesthetic.
This commit is contained in:
Eric Schulte 2011-06-01 06:32:10 -06:00
parent 1afcef3007
commit cbd4a5b764
1 changed files with 8 additions and 8 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
lisp/ob-lisp.el
View file

@ -64,14 +64,14 @@
"Execute a block of Common Lisp code with Babel."
(require 'slime)
(org-babel-reassemble-table
(with-temp-buffer
(insert (org-babel-expand-body:lisp body params))
((lambda (result)
(if (member "output" (cdr (assoc :result-params params)))
(car result)
(condition-case nil
(read (org-bable-lisp-vector-to-list (cadr result)))
(error (cadr result)))))
(with-temp-buffer
(insert (org-babel-expand-body:lisp body params))
(slime-eval `(swank:eval-and-grab-output
,(format "(progn %s)" (buffer-substring-no-properties
(point-min) (point-max))))