From: John Wiegley <johnw@newartisans.com>
Date: Sat, 21 Mar 2015 08:31:59 +0000 (-0500)
Subject: Change bind-key* behavior to mimic bind-keys*
X-Git-Tag: emacs-29.0.90~1306^2~15^2~352
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=012c37d722f779747abdb747db196eeb552aaf4c;p=emacs.git

Change bind-key* behavior to mimic bind-keys*

Fixes https://github.com/jwiegley/use-package/issues/148
---

diff --git a/lisp/use-package/bind-key.el b/lisp/use-package/bind-key.el
index 083c8b1c0a6..12502c07c38 100644
--- a/lisp/use-package/bind-key.el
+++ b/lisp/use-package/bind-key.el
@@ -165,9 +165,7 @@ spelled-out keystrokes, e.g., \"C-c C-z\". See documentation of
   `(bind-key ,key-name nil ,keymap))
 
 (defmacro bind-key* (key-name command)
-  `(progn
-     (bind-key ,key-name ,command)
-     (define-key override-global-map ,(read-kbd-macro key-name) ,command)))
+  `(bind-key ,key-name ,command override-global-map))
 
 (defmacro bind-keys (&rest args)
   "Bind multiple keys at once.