summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorEric Schulte <schulte.eric@gmail.com>2013-06-06 10:58:52 -0600
committerEric Schulte <schulte.eric@gmail.com>2013-06-06 10:58:52 -0600
commitd6a9f1aa295a98faaab2b08c9767d87e26f74342 (patch)
treef4bd1929aec73dfc4cd201b267aae3e00f9ee15a
parent52b91acc59e4bebc3697d6cbe1e9a778deecee04 (diff)
downloadorg-mode-d6a9f1aa295a98faaab2b08c9767d87e26f74342.tar.gz
org-babel-current-exec-src-block-head -> outermost
* lisp/ob-core.el (org-babel-execute-src-block): The org-babel-current-exec-src-block-head variable should point to the outermost code block.
-rw-r--r--lisp/ob-core.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/ob-core.el b/lisp/ob-core.el
index 93c5d5e..3e28cef 100644
--- a/lisp/ob-core.el
+++ b/lisp/ob-core.el
@@ -564,7 +564,8 @@ block."
(let* ((params (if params
(org-babel-process-params merged-params)
(nth 2 info)))
- (org-babel-current-exec-src-block-head (nth 6 info))
+ (org-babel-current-exec-src-block-head
+ (or org-babel-current-exec-src-block-head (nth 6 info)))
(cachep (and (not arg) (cdr (assoc :cache params))
(string= "yes" (cdr (assoc :cache params)))))
(new-hash (when cachep (org-babel-sha1-hash info)))