mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-06 06:20:55 -08:00
Code Issues Projects Releases Wiki Activity

Fix a scoping issues with multiple occurrences of :bind

Browse source 
Fixes https://github.com/jwiegley/use-package/issues/585
This commit is contained in:
John Wiegley 2017-12-09 16:28:49 -08:00
parent 5a02d61ac6
commit ec84ed0dfb
3 changed files with 29 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

7
lisp/use-package/use-package-bind-key.el
View file

@ -128,8 +128,11 @@ deferred until the prefix key sequence is pressed."
(name keyword args rest state &optional bind-macro)
(use-package-concat
(use-package-process-keywords name rest state)
`((,(if bind-macro bind-macro 'bind-keys)
:package ,name ,@(use-package-normalize-commands args)))))
`(,@(mapcar
#'(lambda (xs)
`(,(if bind-macro bind-macro 'bind-keys)
:package ,name ,@(use-package-normalize-commands xs)))
(use-package-split-list-at-keys :break args)))))
(defun use-package-handler/:bind* (name keyword arg rest state)
(use-package-handler/:bind name keyword arg rest state 'bind-keys*))