masscollaborationlabs/emacs
2
0
Fork 0
mirror of https://github.com/masscollaborationlabs/emacs.git synced 2025-07-07 12:49:38 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

Fix the case where :ensure is given no arguments

Browse source 
Fixes https://github.com/jwiegley/use-package/issues/543
This commit is contained in:
John Wiegley 2017-12-04 16:46:46 -08:00
parent afdf1c3638
commit ee07e709ea
2 changed files with 9 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
lisp/use-package/use-package-ensure.el
View file

@ -134,7 +134,7 @@ manually updated package."
(defun use-package-normalize/:ensure (name keyword args) (defun use-package-normalize/:ensure (name keyword args)
(if (null args) (if (null args)
t (list t)
(use-package-only-one (symbol-name keyword) args (use-package-only-one (symbol-name keyword) args
#'(lambda (label arg) #'(lambda (label arg)
(pcase arg (pcase arg

8
test/lisp/use-package/use-package-tests.el
View file

@ -1469,6 +1469,14 @@
(ignore (ignore
(bind-keys :package mu4e ("<f9>" . mu4e)))))) (bind-keys :package mu4e ("<f9>" . mu4e))))))
(ert-deftest use-package-test/543 ()
(match-expansion
(use-package hydra
:ensure)
`(progn
(use-package-ensure-elpa 'hydra '(t) 'nil)
(require 'hydra nil nil))))
(ert-deftest bind-key/:prefix-map () (ert-deftest bind-key/:prefix-map ()
(match-expansion (match-expansion
(bind-keys :prefix "<f1>" (bind-keys :prefix "<f1>"