From: John Wiegley <johnw@newartisans.com>
Date: Thu, 14 Dec 2017 01:03:05 +0000 (-0800)
Subject: Add a test related to
X-Git-Tag: emacs-29.0.90~1306^2~15^2~93
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=51eceb4238ac7b4ed48a454cc7cde67de599fe00;p=emacs.git

Add a test related to

GitHub-reference: https://github.com/jwiegley/use-package/issues/589
---

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 @@
       (bind-keys :package bug
                  ("C-b" . beta)))))
 
+(ert-deftest use-package-test/589 ()
+  (let ((use-package-verbose t)
+        (use-package-expand-minimally t)
+        debug-on-error
+        warnings)
+    (flet ((display-warning (_ msg _) (push msg warnings)))
+      (progn
+        (macroexpand-1
+         '(use-package ediff :defer t (setq my-var t)))
+        (should (= (and (> (length warnings) 0)
+                        (string-match ":defer wants exactly one argument"
+                                      (car warnings))) 44))))))
+
 (ert-deftest bind-key/:prefix-map ()
   (match-expansion
    (bind-keys :prefix "<f1>"