* bind-key.el (bind-key): don't eval key-name at macro expansion time

diff --git a/lisp/use-package/bind-key.el b/lisp/use-package/bind-key.el
index d2a21f3986be3a41a9b1da8032fa2220133c9980..2ddbae2f082e50d1f26086b84700d57828becdab 100644 (file)
--- a/lisp/use-package/bind-key.el
+++ b/lisp/use-package/bind-key.el
@@ -132,7 +132,7 @@ spelled-out keystrokes, e.g., \"C-c C-z\". See documentation of
         (keyvar (make-symbol "key"))
         (bindingvar (make-symbol "binding"))
         (entryvar (make-symbol "entry")))
-    `(let* ((,namevar ,(eval key-name))
+    `(let* ((,namevar ,key-name)
             (,keyvar (if (vectorp ,namevar) ,namevar
                        (read-kbd-macro ,namevar)))
             (,bindingvar (lookup-key (or ,keymap global-map)