From 39a4a85ba1f0a1232169189d4a2790e3f945bdf0 Mon Sep 17 00:00:00 2001 From: Eric Schulte Date: Fri, 12 Jun 2009 13:46:40 -0700 Subject: [PATCH] protecting against spurious spaces in header arguments --- lisp/org-babel.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/org-babel.el b/lisp/org-babel.el index ca6740405..470150896 100644 --- a/lisp/org-babel.el +++ b/lisp/org-babel.el @@ -190,7 +190,7 @@ of the following form. (language body header-arguments-alist)" (delq nil (mapcar (lambda (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))) (match-string 2 arg)))) + (cons (intern (concat ":" (match-string 1 arg))) (org-babel-chomp (match-string 2 arg))))) (split-string (concat " " arg-string) "[ \f\t\n\r\v]+:" t)))) (defun org-babel-where-is-src-block-head ()