Add a test for the perfect match logic

Re #270

diff --git a/ivy-test.el b/ivy-test.el
index 03605e115062b1aea9df9643a7460ab071fabdfc..ddfef347ea3350fb248555666065942c7bc0012b 100644 (file)
--- a/ivy-test.el
+++ b/ivy-test.el
@@ -72,7 +72,11 @@
   (should (equal
            (ivy-with '(ivy-read "test" '("aaab" "aaac"))
                      "a C-n <tab> C-m")
-           "aaac")))
+           "aaac"))
+  (should (equal
+           (ivy-with '(ivy-read "pattern: " '("can do" "can" "can't do"))
+                     "can C-m")
+           "can")))
 
 (ert-deftest swiper--re-builder ()
   (setq swiper--width 4)