summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorNicolas Goaziou <mail@nicolasgoaziou.fr>2016-06-19 00:57:03 +0200
committerNicolas Goaziou <mail@nicolasgoaziou.fr>2016-06-19 00:57:03 +0200
commit69552bd42f99236578f51abcccd201dec3855d39 (patch)
treef59e9ce1cd0d28fab2fd7f832c33b22f7ec25c3e
parent65e9dcee8d17e108b12cf09b1397ca2282ef205e (diff)
downloadorg-mode-69552bd42f99236578f51abcccd201dec3855d39.tar.gz
ob-tangle: Fix failing test on Emacs 24.3
* lisp/ob-tangle.el (org-babel-tangle): Do not use `add-to-list' on a let-bound symbol.
-rw-r--r--lisp/ob-tangle.el6
1 files changed, 2 insertions, 4 deletions
diff --git a/lisp/ob-tangle.el b/lisp/ob-tangle.el
index 674f88a..76c2d73 100644
--- a/lisp/ob-tangle.el
+++ b/lisp/ob-tangle.el
@@ -290,10 +290,8 @@ used to limit the exported source code blocks by language."
(unless tangle-mode (setq tangle-mode #o755)))
;; update counter
(setq block-counter (+ 1 block-counter))
- (add-to-list 'path-collector
- (cons file-name tangle-mode)
- nil
- (lambda (a b) (equal (car a) (car b))))))))
+ (unless (assoc file-name path-collector)
+ (push (cons file-name tangle-mode) path-collector))))))
specs)))
(if (equal arg '(4))
(org-babel-tangle-single-block 1 t)