aboutsummaryrefslogtreecommitdiffstats
path: root/test/lisp/use-package
diff options
context:
space:
mode:
authorJohn Wiegley2017-12-13 17:03:05 -0800
committerJohn Wiegley2017-12-13 17:03:05 -0800
commit51eceb4238ac7b4ed48a454cc7cde67de599fe00 (patch)
tree831804bbce80eeaa0d867476662f17019b438171 /test/lisp/use-package
parent31fa2f24a106f2e1fe433713c1e867d27788774e (diff)
downloademacs-51eceb4238ac7b4ed48a454cc7cde67de599fe00.tar.gz
emacs-51eceb4238ac7b4ed48a454cc7cde67de599fe00.zip
Add a test related to
GitHub-reference: https://github.com/jwiegley/use-package/issues/589
Diffstat (limited to 'test/lisp/use-package')
-rw-r--r--test/lisp/use-package/use-package-tests.el13
1 files changed, 13 insertions, 0 deletions
diff --git a/test/lisp/use-package/use-package-tests.el b/test/lisp/use-package/use-package-tests.el
index 59a041789cb..5039e21064c 100644
--- a/test/lisp/use-package/use-package-tests.el
+++ b/test/lisp/use-package/use-package-tests.el
@@ -1849,6 +1849,19 @@
1849 (bind-keys :package bug 1849 (bind-keys :package bug
1850 ("C-b" . beta))))) 1850 ("C-b" . beta)))))
1851 1851
1852(ert-deftest use-package-test/589 ()
1853 (let ((use-package-verbose t)
1854 (use-package-expand-minimally t)
1855 debug-on-error
1856 warnings)
1857 (flet ((display-warning (_ msg _) (push msg warnings)))
1858 (progn
1859 (macroexpand-1
1860 '(use-package ediff :defer t (setq my-var t)))
1861 (should (= (and (> (length warnings) 0)
1862 (string-match ":defer wants exactly one argument"
1863 (car warnings))) 44))))))
1864
1852(ert-deftest bind-key/:prefix-map () 1865(ert-deftest bind-key/:prefix-map ()
1853 (match-expansion 1866 (match-expansion
1854 (bind-keys :prefix "<f1>" 1867 (bind-keys :prefix "<f1>"