branch: externals/setup commit 7a78f66c146e6051c84429676062f681260ab182 Author: Philip K <phil...@posteo.net> Commit: Philip K <phil...@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)