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

Bugfix: my regexp was not allowing whitespace inside function call.

This commit is contained in:
Dan Davison 2009-07-11 23:51:01 -04:00
parent a0e0fe17f4
commit 08eba0ceea
1 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lisp/org-babel.el
View File

@ -504,7 +504,7 @@ parameters when merging lists."
(case (car pair) (case (car pair)
(:var (:var
;; we want only one specification per variable ;; we want only one specification per variable
(when (string-match "\\([^= \f\t\n\r\v]+\\)=\\([^ \f\t\n\r\v]+\\)" (cdr pair)) (when (string-match "^\\([^= \f\t\n\r\v]+\\)=\\([^\f\n\r\v]+\\)$" (cdr pair))
;; TODO: When is this not true? Can there be whitespace around the '='? ;; TODO: When is this not true? Can there be whitespace around the '='?
(setq var (intern (match-string 1 (cdr pair))) (setq var (intern (match-string 1 (cdr pair)))
ref (match-string 2 (cdr pair)) ref (match-string 2 (cdr pair))