emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/setup 7a78f66 24/24: Consistently use symbol-value inst


From: Stefan Monnier
Subject: [elpa] externals/setup 7a78f66 24/24: Consistently use symbol-value instead of eval
Date: Thu, 25 Mar 2021 13:42:38 -0400 (EDT)

branch: externals/setup
commit 7a78f66c146e6051c84429676062f681260ab182
Author: Philip K <philipk@posteo.net>
Commit: Philip K <philipk@posteo.net>

    Consistently use symbol-value instead of eval
---
 setup.el | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/setup.el b/setup.el
index 3b26d78..9ffb1f5 100644
--- a/setup.el
+++ b/setup.el
@@ -275,7 +275,7 @@ the first FEATURE."
 
 (setup-define :bind
   (lambda (key command)
-    `(define-key (eval setup-map)
+    `(define-key (symbol-value setup-map)
        ,(if (or (symbolp key) (stringp key))
             `(kbd ,key)
           key)
@@ -300,9 +300,9 @@ the first FEATURE."
 (setup-define :rebind
   (lambda (key command)
     `(progn
-       (dolist (key (where-is-internal ',command (eval setup-map)))
-         (define-key (eval setup-map) key nil))
-       (define-key (eval setup-map)
+       (dolist (key (where-is-internal ',command (symbol-value setup-map)))
+         (define-key (symbol-value setup-map) key nil))
+       (define-key (symbol-value setup-map)
          ,(if (or (symbolp key) (stringp key))
               `(kbd ,key)
             key)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]