do not read #-prefix header-arg value as emacs lisp
* lisp/ob-core.el (org-babel-read): Do not read #-prefix header-arg value as emacs lisp.
This commit is contained in:
parent
e23bd6df8a
commit
04a1b98e5e
|
@ -2532,14 +2532,14 @@ block but are passed literally to the \"example-block\"."
|
|||
(defun org-babel-read (cell &optional inhibit-lisp-eval)
|
||||
"Convert the string value of CELL to a number if appropriate.
|
||||
Otherwise if cell looks like lisp (meaning it starts with a
|
||||
\"(\", \"'\", \"`\" \"#\" or a \"[\") then read it as lisp,
|
||||
\"(\", \"'\", \"`\" or a \"[\") then read it as lisp,
|
||||
otherwise return it unmodified as a string. Optional argument
|
||||
NO-LISP-EVAL inhibits lisp evaluation for situations in which is
|
||||
it not appropriate."
|
||||
(if (and (stringp cell) (not (equal cell "")))
|
||||
(or (org-babel-number-p cell)
|
||||
(if (and (not inhibit-lisp-eval)
|
||||
(or (member (substring cell 0 1) '("(" "'" "`" "[" "#"))
|
||||
(or (member (substring cell 0 1) '("(" "'" "`" "["))
|
||||
(string= cell "*this*")))
|
||||
(eval (read cell))
|
||||
(if (string= (substring cell 0 1) "\"")
|
||||
|
|
Loading…
Reference in New Issue