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

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

[nongnu] elpa/evil c236a617ce 2/3: Support { and } marks in evil-ex-gram


From: ELPA Syncer
Subject: [nongnu] elpa/evil c236a617ce 2/3: Support { and } marks in evil-ex-grammar (#1558)
Date: Mon, 3 Jan 2022 08:58:16 -0500 (EST)

branch: elpa/evil
commit c236a617ce7188a1065b503dbf88056d74c806be
Author: Brian Leung <29217594+leungbk@users.noreply.github.com>
Commit: GitHub <noreply@github.com>

    Support { and } marks in evil-ex-grammar (#1558)
---
 evil-ex.el    | 2 +-
 evil-tests.el | 8 ++++++++
 2 files changed, 9 insertions(+), 1 deletion(-)

diff --git a/evil-ex.el b/evil-ex.el
index 19875ac0e6..488fc2034e 100644
--- a/evil-ex.el
+++ b/evil-ex.el
@@ -117,7 +117,7 @@
      ("\\?" "\\(?:[\\].\\|[^?]\\)+" "\\?"
       #'(evil-ex-re-bwd $2)))
     (marker-name
-     "[]\\[-a-zA-Z_<>']")
+     "[]\\[-a-zA-Z_<>'}{]")
     (next
      "\\\\/" #'(evil-ex-prev-search))
     (prev
diff --git a/evil-tests.el b/evil-tests.el
index 53f57761f1..609f7dd85a 100644
--- a/evil-tests.el
+++ b/evil-tests.el
@@ -7261,6 +7261,14 @@ if no previous selection")
                    (evil-ex-line
                     (evil-ex-marker "]")
                     nil))))
+  (should (equal (evil-ex-parse "'{,'}" nil 'range)
+                 '(evil-ex-range
+                   (evil-ex-line
+                    (evil-ex-marker "{")
+                    nil)
+                   (evil-ex-line
+                    (evil-ex-marker "}")
+                    nil))))
   (should (equal (evil-ex-parse ",']" nil 'range)
                  '(evil-ex-range
                    (evil-ex-current-line)



reply via email to

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