summaryrefslogtreecommitdiff
path: root/lisp/use-package/use-package-bind-key.el
diff options
context:
space:
mode:
authorJohn Wiegley <johnw@newartisans.com>2017-12-09 16:28:49 -0800
committerJohn Wiegley <johnw@newartisans.com>2017-12-09 16:29:11 -0800
commitec84ed0dfbeebb8683330449aa4e476debd2f72c (patch)
tree717f0bbd1295ec79b925df7429a2e3de1e38f28a /lisp/use-package/use-package-bind-key.el
parent5a02d61ac61d52e55bf642006f75afce95270376 (diff)
downloademacs-ec84ed0dfbeebb8683330449aa4e476debd2f72c.tar.gz
emacs-ec84ed0dfbeebb8683330449aa4e476debd2f72c.tar.bz2
emacs-ec84ed0dfbeebb8683330449aa4e476debd2f72c.zip
Fix a scoping issues with multiple occurrences of :bind
Fixes https://github.com/jwiegley/use-package/issues/585
Diffstat (limited to 'lisp/use-package/use-package-bind-key.el')
-rw-r--r--lisp/use-package/use-package-bind-key.el7
1 files changed, 5 insertions, 2 deletions
diff --git a/lisp/use-package/use-package-bind-key.el b/lisp/use-package/use-package-bind-key.el
index b26c812bf58..d8fe56dfaa5 100644
--- a/lisp/use-package/use-package-bind-key.el
+++ b/lisp/use-package/use-package-bind-key.el
@@ -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*))