org-babel-c: cleaning up header arguments

This commit is contained in:
Eric Schulte 2010-04-10 15:43:31 -06:00
parent 0e8c9f7a49
commit 99a07f1d4a
1 changed files with 3 additions and 4 deletions

View File

@ -77,11 +77,10 @@ called by `org-babel-execute-src-block'."
(cmdline (cdr (assoc :cmdline params)))
(flags (cdr (assoc :flags params)))
(vars (second processed-params))
(includes (org-babel-read
(or (cdr (assoc :includes params))
(org-entry-get nil "includes" t))))
(includes (or (cdr (assoc :includes params))
(org-entry-get nil "includes" t)))
(defines (org-babel-read
(or (cdr (assoc :includes params))
(or (cdr (assoc :defines params))
(org-entry-get nil "defines" t))))
(full-body (mapconcat 'identity
(list