Add another :bind test

diff --git a/test/lisp/use-package/use-package-tests.el b/test/lisp/use-package/use-package-tests.el
index 2f4a7b897c4e469077f1baa4054851c9ac446c58..0b40fb582ad673cf325a4ad45e4eae5d4231e581 100644 (file)
--- a/test/lisp/use-package/use-package-tests.el
+++ b/test/lisp/use-package/use-package-tests.el
@@ -680,6 +680,24 @@
       (ignore
        (bind-keys :package foo ("C-c r" . browse-at-remote))))))
 
+(ert-deftest use-package-test/:bind-8 ()
+  (match-expansion
+   (use-package foo
+     :ensure
+     :bind (:map foo-map
+                 (("C-c r" . foo)
+                  ("C-c r" . bar))))
+   `(progn
+      (use-package-ensure-elpa 'foo '(t) 'nil)
+      (unless (fboundp 'foo)
+        (autoload #'foo "foo" nil t))
+      (unless (fboundp 'bar)
+        (autoload #'bar "foo" nil t))
+      (ignore
+       (bind-keys :package foo :map foo-map
+                  ("C-c r" . foo)
+                  ("C-c r" . bar))))))
+
 (ert-deftest use-package-test/:bind*-1 ()
   (match-expansion
    (use-package foo :bind* ("C-k" . key))