Browse Source

org-babel-c: cleaning up header arguments

Eric Schulte 15 years ago
parent
commit
99a07f1d4a
1 changed files with 3 additions and 4 deletions
  1. 3 4
      contrib/babel/lisp/langs/org-babel-C.el

+ 3 - 4
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