[elpa] externals/ivy-hydra eeb14b1 213/395: ivy-test.el (ivy-read-history): Add a test

[Basil L. Contovounesios]

branch: externals/ivy-hydra
commit eeb14b11f97dffc8161385ec823d63585f818143
Author: Oleh Krehel <ohwoeowho@gmail.com>
Commit: Oleh Krehel <ohwoeowho@gmail.com>

    ivy-test.el (ivy-read-history): Add a test
    
    Re #2524
---
 ivy-test.el | 9 +++++++++
 1 file changed, 9 insertions(+)

diff --git a/ivy-test.el b/ivy-test.el
index 92b57c3..fa07721 100644
--- a/ivy-test.el
+++ b/ivy-test.el
@@ -187,6 +187,15 @@ Since `execute-kbd-macro' doesn't pick up a let-bound 
`default-directory'.")
                   "C-m")
                  "one")))
 
+(ert-deftest ivy-read-history ()
+  (defvar ivy-read-hist '("c" "b" "a"))
+  (should
+   (equal
+    (let ((hist ))
+      (ivy-with '(ivy-read "test: " '("c" "d") :history 'ivy-read-hist) "RET")
+      ivy-read-hist)
+    '("c" "b" "a"))))
+
 (ert-deftest ivy-read-sort-alist ()
   (should (equal (ivy-with '(let ((coll '(("b" . "1") ("a" . "2"))))
                              (ivy-read "test:" coll