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:
Eric Schulte 2013-06-08 15:13:38 -06:00
parent e23bd6df8a
commit 04a1b98e5e
1 changed files with 2 additions and 2 deletions

View File

@ -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) "\"")