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

Add test for use-package-test-normalize/:ensure

Browse source
This commit is contained in:
John Wiegley 2017-11-30 18:37:27 -08:00
parent 9465b915a8
commit 7a562f10cb
1 changed files with 10 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

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

@ -85,6 +85,16 @@
;; (should (equal (macroexpand (use-package))
;; '())))
(ert-deftest use-package-test-normalize/:ensure ()
(flet ((norm (&rest args)
(apply #'use-package-normalize/:ensure
'foopkg :ensure args)))
(should (equal (norm '(t)) t))
(should (equal (norm '(nil)) nil))
(should (equal (norm '(sym)) 'sym))
(should-error (norm '(1)))
(should-error (norm '("Hello")))))
(ert-deftest use-package-test/:ensure ()
(let ((use-package-always-ensure nil))
(match-expansion