Bugfix in org-babel-read (relevant to all branches).

I haven't managed to see why this is a 2. It breaks if cell is a
string of length 1. I'm changing it to a 1 (as it is in
org-collector.el), on the assumption that the 2 was erroneous.
This commit is contained in:
Dan Davison 2009-07-11 22:45:57 -04:00
parent d37d148d3f
commit ad57e15afe
1 changed files with 4 additions and 4 deletions

View File

@ -414,15 +414,15 @@ non-nil."
(defun org-babel-read (cell)
"Convert the string value of CELL to a number if appropriate.
Otherwise if cell looks like a list (meaning it starts with a
'(') then read it as lisp, otherwise return it unmodified as a
string.
Otherwise if cell looks like lisp (meaning it starts with a
\"(\" or a \"'\") then read it as lisp, otherwise return it
unmodified as a string.
This is taken almost directly from `org-read-prop'."
(if (and (stringp cell) (not (equal cell "")))
(or (org-babel-number-p cell)
(if (or (equal "(" (substring cell 0 1))
(equal "'" (substring cell 0 2)))
(equal "'" (substring cell 0 1)))
(read cell)
(progn (set-text-properties 0 (length cell) nil cell) cell)))
cell))