aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorMatthew Justin Bauer2018-02-25 15:03:43 -0600
committerGitHub2018-02-25 15:03:43 -0600
commit2250f89ac0b8d2c19875dab67e73ac1cfe6ca3df (patch)
tree5836caab8ea225817e488a4f685a6d844a127eea
parent10b4dcb53abf4b2e258167fa1c1373489e194963 (diff)
downloademacs-2250f89ac0b8d2c19875dab67e73ac1cfe6ca3df.tar.gz
emacs-2250f89ac0b8d2c19875dab67e73ac1cfe6ca3df.zip
Support ":package" in use-package
bind-key supports the keyword ":package" but use-package does not know that. Adding this should be helpful. In the future, maybe we could automatically fill in with the use-package package, but that could be a breaking change.
-rw-r--r--lisp/use-package/use-package-bind-key.el4
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/use-package/use-package-bind-key.el b/lisp/use-package/use-package-bind-key.el
index d8fe56dfaa5..d17ecb2cf75 100644
--- a/lisp/use-package/use-package-bind-key.el
+++ b/lisp/use-package/use-package-bind-key.el
@@ -87,12 +87,14 @@ deferred until the prefix key sequence is pressed."
87 ;; :prefix STRING 87 ;; :prefix STRING
88 ;; :filter SEXP 88 ;; :filter SEXP
89 ;; :menu-name STRING 89 ;; :menu-name STRING
90 ;; :package SYMBOL
90 ((or (and (eq x :map) (symbolp (cadr arg))) 91 ((or (and (eq x :map) (symbolp (cadr arg)))
91 (and (eq x :prefix) (stringp (cadr arg))) 92 (and (eq x :prefix) (stringp (cadr arg)))
92 (and (eq x :prefix-map) (symbolp (cadr arg))) 93 (and (eq x :prefix-map) (symbolp (cadr arg)))
93 (and (eq x :prefix-docstring) (stringp (cadr arg))) 94 (and (eq x :prefix-docstring) (stringp (cadr arg)))
94 (eq x :filter) 95 (eq x :filter)
95 (and (eq x :menu-name) (stringp (cadr arg)))) 96 (and (eq x :menu-name) (stringp (cadr arg)))
97 (and (eq x :package) (symbolp (cadr arg))))
96 (setq args* (nconc args* (list x (cadr arg)))) 98 (setq args* (nconc args* (list x (cadr arg))))
97 (setq arg (cddr arg))) 99 (setq arg (cddr arg)))
98 ((listp x) 100 ((listp x)