1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-06 06:20:55 -08:00

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

Fixes https://github.com/jwiegley/use-package/issues/148
This commit is contained in:
John Wiegley 2015-03-21 03:31:59 -05:00
parent 029e46a874
commit 012c37d722

View file

@ -165,9 +165,7 @@ spelled-out keystrokes, e.g., \"C-c C-z\". See documentation of
`(bind-key ,key-name nil ,keymap)) `(bind-key ,key-name nil ,keymap))
(defmacro bind-key* (key-name command) (defmacro bind-key* (key-name command)
`(progn `(bind-key ,key-name ,command override-global-map))
(bind-key ,key-name ,command)
(define-key override-global-map ,(read-kbd-macro key-name) ,command)))
(defmacro bind-keys (&rest args) (defmacro bind-keys (&rest args)
"Bind multiple keys at once. "Bind multiple keys at once.