I found that all of my header arguments to source blocks were getting
ignored. Moving the header-args into the let* binding seems to fix this
issue, though I'm not enough of a guru to know why. Without this
arguments like
#+BEGIN_SRC clojure :tangle ./project.clj
and
#+BEGIN_SRC clojure :tangle no
were getting ignored and substituted for ":tangle yes" along with other
defaults.
Hope this patch is in the right format:
diff --git a/ob-core.el b/ob-core-old.el
index ba82d88..a6ffcc4 100644
--- a/ob-core.el
+++ b/ob-core-old.el
@@ -1368,14 +1368,7 @@ specified in the properties of the current
outline entry."
(or body "")))))
(preserve-indentation (or org-src-preserve-indentation
(save-match-data
- (string-match "-i\\>" switches))))
- (header-args (apply #'org-babel-merge-params
- org-babel-default-header-args
- (when (boundp lang-headers) (eval
lang-headers))
- (append
- (org-babel-params-from-properties lang)
- (list (org-babel-parse-header-arguments
- (org-no-properties (or
(match-string 4) ""))))))))
+ (string-match "-i\\>" switches)))))
(list lang
;; get block body less properties, protective commas, and
indentation
(with-temp-buffer
@@ -1383,7 +1376,13 @@ specified in the properties of the current
outline entry."
(insert (org-unescape-code-in-string body))
(unless preserve-indentation (org-do-remove-indentation))
(buffer-string)))
- header-args
+ (apply #'org-babel-merge-params
+ org-babel-default-header-args
+ (when (boundp lang-headers) (eval lang-headers))
+ (append
+ (org-babel-params-from-properties lang)
+ (list (org-babel-parse-header-arguments
+ (org-no-properties (or (match-string 4) ""))))))
switches
block-indentation)))
--
Sam Ritchie (@sritchie)