emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/ivy-hydra 8dba6ff 115/395: ivy-test.el (swiper-query-re


From: Basil L. Contovounesios
Subject: [elpa] externals/ivy-hydra 8dba6ff 115/395: ivy-test.el (swiper-query-replace): Add test
Date: Thu, 25 Feb 2021 08:31:43 -0500 (EST)

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

    ivy-test.el (swiper-query-replace): Add test
    
    Re #2416
---
 ivy-test.el | 10 ++++++++++
 1 file changed, 10 insertions(+)

diff --git a/ivy-test.el b/ivy-test.el
index 4b754d0..15f3956 100644
--- a/ivy-test.el
+++ b/ivy-test.el
@@ -1176,6 +1176,16 @@ a buffer visiting a file."
            (and (buffer-name temp-buffer)
                 (kill-buffer temp-buffer)))))))
 
+(ert-deftest swiper-query-replace ()
+  (dolist (re-builder '(regexp-quote ivy--regex ivy--regex-plus 
ivy--regex-fuzzy ivy--regex-ignore-order))
+    (dolist (swiper-cmd '(swiper swiper-isearch))
+      (let ((ivy-re-builders-alist `((t . ,re-builder))))
+        (should (equal (ivy-with-text
+                        "|foo bar"
+                        (global-set-key (kbd "C-s") swiper-cmd)
+                        ("C-s" "foo" "M-q" "asdf" "C-j" "y"))
+                       "asdf| bar"))))))
+
 (ert-deftest swiper-thing-at-point ()
   (should
    (string=



reply via email to

[Prev in Thread] Current Thread [Next in Thread]