From 99a07f1d4a40de4ba9e6f80b27023522f82f713c Mon Sep 17 00:00:00 2001 From: Eric Schulte Date: Sat, 10 Apr 2010 15:43:31 -0600 Subject: [PATCH] org-babel-c: cleaning up header arguments --- contrib/babel/lisp/langs/org-babel-C.el | 7 +++---- 1 file changed, 3 insertions(+), 4 deletions(-) diff --git a/contrib/babel/lisp/langs/org-babel-C.el b/contrib/babel/lisp/langs/org-babel-C.el index 38429b3c8..f723ec3da 100644 --- a/contrib/babel/lisp/langs/org-babel-C.el +++ b/contrib/babel/lisp/langs/org-babel-C.el @@ -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