forked from mirrors/org-mode
org-babel: fix bug introduced in commit 78cdf149
* lisp/ob.el (org-babel-result-cond): Macro expansion needs to unquote formal parameter `result-params´.
This commit is contained in:
parent
cf9838febd
commit
01bf706f7f
16
lisp/ob.el
16
lisp/ob.el
|
@ -2567,14 +2567,14 @@ Emacs shutdown."))
|
|||
(defmacro org-babel-result-cond (result-params scalar-form &rest table-forms)
|
||||
"Call the code to parse raw string results according to RESULT-PARAMS."
|
||||
(declare (indent 1))
|
||||
`(unless (member "none" result-params)
|
||||
(if (or (member "scalar" result-params)
|
||||
(member "verbatim" result-params)
|
||||
(member "html" result-params)
|
||||
(member "code" result-params)
|
||||
(member "pp" result-params)
|
||||
(and (member "output" result-params)
|
||||
(not (member "table" result-params))))
|
||||
`(unless (member "none" ,result-params)
|
||||
(if (or (member "scalar" ,result-params)
|
||||
(member "verbatim" ,result-params)
|
||||
(member "html" ,result-params)
|
||||
(member "code" ,result-params)
|
||||
(member "pp" ,result-params)
|
||||
(and (member "output" ,result-params)
|
||||
(not (member "table" ,result-params))))
|
||||
,scalar-form
|
||||
,@table-forms)))
|
||||
|
||||
|
|
Loading…
Reference in a new issue