ndwarshuis
/
org-mode
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

org-babel: no longer over evaluating header arguments

This commit is contained in:
Eric Schulte 2010-04-10 15:43:19 -06:00
parent 3386a702f8
commit 0e8c9f7a49
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
contrib/babel/lisp/org-babel.el
View File

@ -576,7 +576,7 @@ may be specified in the properties of the current outline entry."
(if (string-match "\\([^ \f\t\n\r\v]+\\)[ \f\t\n\r\v]+\\([^ \f\t\n\r\v]+.*\\)" arg) (if (string-match "\\([^ \f\t\n\r\v]+\\)[ \f\t\n\r\v]+\\([^ \f\t\n\r\v]+.*\\)" arg)
(cons (intern (concat ":" (match-string 1 arg))) (cons (intern (concat ":" (match-string 1 arg)))
(let ((raw (org-babel-chomp (match-string 2 arg)))) (let ((raw (org-babel-chomp (match-string 2 arg))))
(if (org-babel-number-p raw) raw (eval (org-babel-read raw))))) (if (org-babel-number-p raw) raw (org-babel-read raw))))
(cons (intern (concat ":" arg)) nil))) (cons (intern (concat ":" arg)) nil)))
(split-string (concat " " arg-string) "[ \f\t\n\r\v]+:" t))))) (split-string (concat " " arg-string) "[ \f\t\n\r\v]+:" t)))))