[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[nongnu] elpa/geiser 5bfce52a63 2/2: Fix: don't use add-to-list on lexic
From: |
ELPA Syncer |
Subject: |
[nongnu] elpa/geiser 5bfce52a63 2/2: Fix: don't use add-to-list on lexical variable |
Date: |
Sun, 21 Aug 2022 09:58:36 -0400 (EDT) |
branch: elpa/geiser
commit 5bfce52a63543b7e3955abfa64b2abac1e14d231
Author: jao <jao@gnu.org>
Commit: jao <jao@gnu.org>
Fix: don't use add-to-list on lexical variable
Thanks to Brian Leung
---
elisp/geiser-repl.el | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/elisp/geiser-repl.el b/elisp/geiser-repl.el
index f1207bd1b1..0a1f544163 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)))