summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorjao <jao@gnu.org>2022-08-21 14:55:52 +0100
committerjao <jao@gnu.org>2022-08-21 14:55:52 +0100
commit5bfce52a63543b7e3955abfa64b2abac1e14d231 (patch)
treecf9aa6d2d768785bdf5508d5b940eb058ba72fa0
parentbb309de946af96e7a1f710171c9e01c6cce9525d (diff)
downloadgeiser-5bfce52a63543b7e3955abfa64b2abac1e14d231.tar.gz
geiser-5bfce52a63543b7e3955abfa64b2abac1e14d231.tar.bz2
Fix: don't use add-to-list on lexical variable
Thanks to Brian Leung
-rw-r--r--elisp/geiser-repl.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/elisp/geiser-repl.el b/elisp/geiser-repl.el
index f1207bd..0a1f544 100644
--- a/elisp/geiser-repl.el
+++ b/elisp/geiser-repl.el
@@ -333,7 +333,8 @@ will be set up using `geiser-connect-local' when a REPL is started.")
(let ((act))
(dolist (repl geiser-repl--repls act)
(with-current-buffer repl
- (add-to-list 'act geiser-impl--implementation)))))
+ (unless (memq geiser-impl--implementation act)
+ (push geiser-impl--implementation act))))))
(defsubst geiser-repl--repl-name (impl)
(format "%s REPL" (geiser-impl--impl-str impl)))