Bugfix: my regexp was not allowing whitespace inside function call.
This commit is contained in:
parent
a0e0fe17f4
commit
08eba0ceea
|
@ -504,7 +504,7 @@ parameters when merging lists."
|
|||
(case (car pair)
|
||||
(:var
|
||||
;; 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 '='?
|
||||
(setq var (intern (match-string 1 (cdr pair)))
|
||||
ref (match-string 2 (cdr pair))
|
||||
|
|
Loading…
Reference in New Issue