]> code.delx.au - gnu-emacs-elpa/blobdiff - ivy-test.el
counsel.el (counsel-git): Add "j" action
[gnu-emacs-elpa] / ivy-test.el
index e857449e99e2184c79164527c20e08e7763a34e3..866eaa722c05a8222ea15df279734cf41ad4ddef 100644 (file)
 
 (ert-deftest ivy--format ()
   (should (string= (let ((ivy--index 10)
-                         (ivy-format-function (lambda (x) (mapconcat (lambda (y) (car y)) x "\n")))
+                         (ivy-format-function (lambda (x) (mapconcat #'identity x "\n")))
                          (cands '("NAME"
                                   "SYNOPSIS"
                                   "DESCRIPTION"
 (ert-deftest counsel-unquote-regex-parens ()
   (should (equal (counsel-unquote-regex-parens
                   (ivy--regex "foo bar"))
-                 "(foo).*?(bar)")))
+                 "(foo).*?(bar)"))
+  (should (equal (counsel-unquote-regex-parens
+                  (ivy--regex "(foo bar"))
+                 "(\\(foo).*?(bar)")))