mirror of
https://git.savannah.gnu.org/git/emacs/org-mode.git
synced 2024-09-30 03:20:01 +00:00
ob-emacs-lisp: respects ":results verbatim"
* lisp/ob-emacs-lisp.el (org-babel-execute:emacs-lisp): Respects ":results verbatim".
This commit is contained in:
parent
56de599c00
commit
3f3fc513b7
|
@ -57,7 +57,8 @@
|
||||||
"Execute a block of emacs-lisp code with Babel."
|
"Execute a block of emacs-lisp code with Babel."
|
||||||
(save-window-excursion
|
(save-window-excursion
|
||||||
((lambda (result)
|
((lambda (result)
|
||||||
(if (member "scalar" (cdr (assoc :result-params params)))
|
(if (or (member "scalar" (cdr (assoc :result-params params)))
|
||||||
|
(member "verbatim" (cdr (assoc :result-params params))))
|
||||||
(let ((print-level nil)
|
(let ((print-level nil)
|
||||||
(print-length nil))
|
(print-length nil))
|
||||||
(format "%S" result))
|
(format "%S" result))
|
||||||
|
|
Loading…
Reference in a new issue