From 4efd35510871047b438241788be77c089ac78945 Mon Sep 17 00:00:00 2001
From: John Wiegley <johnw@newartisans.com>
Date: Mon, 4 Dec 2017 09:33:18 -0800
Subject: [PATCH] Add two new tests

---
 up-tests.el | 32 ++++++++++++++++++++++++++++++++
 1 file changed, 32 insertions(+)

diff --git a/up-tests.el b/up-tests.el
index 33b43654313..063db98bbea 100644
--- a/up-tests.el
+++ b/up-tests.el
@@ -1219,6 +1219,38 @@
       (if (fboundp 'delight)
           (delight '((foo "bar" foo)))))))
 
+(ert-deftest use-package-test/538 ()
+  (match-expansion
+   (use-package mu4e
+     :commands (mu4e)
+     :bind (("<f9>" . mu4e))
+     :init
+     :config
+     (config))
+   `(progn
+      (unless
+          (fboundp 'mu4e)
+        (autoload #'mu4e "mu4e" nil t))
+      (eval-after-load 'mu4e
+        '(progn
+           (config)
+           t))
+      (ignore
+       (bind-keys :package mu4e
+                  ("<f9>" . mu4e))))))
+
+(ert-deftest use-package-test/539 ()
+  (match-expansion
+   (use-package foo
+     :requires bar
+     :after quux
+     :ensure bow)
+   `(progn
+      (use-package-ensure-elpa 'foo 'bow 'nil)
+      (when (featurep 'bar)
+        (eval-after-load 'quux
+          '(require 'foo nil nil))))))
+
 ;; Local Variables:
 ;; indent-tabs-mode: nil
 ;; no-byte-compile: t
-- 
2.39.2