mirror/org-mode
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git synced 2025-01-27 20:22:00 +00:00
Code

ob-clojure: respects "scalar" and "verbatim" results params

Browse Source 
* lisp/ob-clojure.el (org-babel-execute:clojure): Respects "scalar"
  and "verbatim" results params.
This commit is contained in:
Eric Schulte 2011-07-10 09:38:37 -06:00
parent c6e69cd85b
commit 52a14c5e2e
1 changed files with 8 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
lisp/ob-clojure.el
View File

@ -78,11 +78,16 @@
(require 'slime) (require 'swank-clojure)
(with-temp-buffer
(insert (org-babel-expand-body:clojure body params))
((lambda (result) (condition-case nil (org-babel-script-escape result)
(error result)))
((lambda (result)
(let ((result-params (cdr (assoc :result-params params))))
(if (or (member "scalar" result-params)
(member "verbatim" result-params))
result
(condition-case nil (org-babel-script-escape result)
(error result)))))
(slime-eval
`(swank:interactive-eval-region
,(buffer-substring-no-properties (point-min) (point-max)))
,(buffer-substring-no-properties (point-min) (point-max)))
(cdr (assoc :package params))))))
(provide 'ob-clojure)