summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJacopo De Simoi <jacopods@protonmail.com>2021-06-30 23:33:56 -0400
committerNicolas Goaziou <mail@nicolasgoaziou.fr>2021-07-01 15:42:29 +0200
commit221c8e298ffc1098c89e5a38430878aa45a2ecf7 (patch)
treef44f1c2b86e7839e8ce74eccca6f7e3d0841a20a
parentb913f34ec31d8b56a246a459801f0fdeb2faf364 (diff)
downloadorg-mode-221c8e298ffc1098c89e5a38430878aa45a2ecf7.tar.gz
ob-tangle: Parse correctly tangle options
* lisp/ob-tangle.el (org-babel-effective-tangled-filename): Check for the "no" parameter in this function to avoid erroneous tangling of a single block (e.g. with C-u C-c C-v t) even with the parameter :tangle no TINYCHANGE
-rw-r--r--lisp/ob-tangle.el1
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/ob-tangle.el b/lisp/ob-tangle.el
index 562776a..2f60ef9 100644
--- a/lisp/ob-tangle.el
+++ b/lisp/ob-tangle.el
@@ -359,6 +359,7 @@ as computed by `org-babel-tangle-single-block'."
((string= "yes" src-tfile)
;; Use the buffer name
(file-name-sans-extension buffer-fn))
+ ((string= "no" src-tfile) nil)
((> (length src-tfile) 0) src-tfile)))
(ext (or (cdr (assoc src-lang org-babel-tangle-lang-exts)) src-lang)))
(when base-name