Fix naive argument parsing at #+srcname.

This commit is contained in:
Dan Davison 2009-07-23 23:11:17 -04:00
parent f53d61980f
commit 3457849008

View file

@ -252,8 +252,7 @@ of the following form. (language body header-arguments-alist)"
(defun org-babel-get-src-block-function-args ()
(when (org-babel-get-src-block-name)
(mapcar (lambda (ref) (cons :var ref))
(split-string (org-babel-clean-text-properties (match-string 2))
",[ \f\t\n\r\v]*"))))
(org-babel-ref-split-args (match-string 2)))))
(defmacro org-babel-map-source-blocks (file &rest body)
"Evaluate BODY forms on each source-block in FILE."