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

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

[nongnu] elpa/paredit 2463273 130/224: Add tests for region deletion acr


From: ELPA Syncer
Subject: [nongnu] elpa/paredit 2463273 130/224: Add tests for region deletion across comment boundaries.
Date: Sat, 7 Aug 2021 09:22:34 -0400 (EDT)

branch: elpa/paredit
commit 2463273cabb1ac803ef6765fe2d2f9ec4902ce60
Author: Taylor R Campbell <campbell@mumble.net>
Commit: Taylor R Campbell <campbell@mumble.net>

    Add tests for region deletion across comment boundaries.
    
    Ignore-this: 145763cd2559105046cddd21c3da31d2
    
    darcs-hash:20110411190401-00fcc-44f724d53c52deb35d81b6c3a4bee70ef7d56222
---
 test.el | 8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

diff --git a/test.el b/test.el
index 3ff0544..3e0770b 100644
--- a/test.el
+++ b/test.el
@@ -251,7 +251,13 @@ Four arguments: the paredit command, the text of the buffer
       ("(foo |bar_ baz)\n" "(foo | baz)\n")
       ("(foo |(bar \"baz\" ; quux\n          zot)\n     _mumble)"
        "(foo |mumble)")
-      ("(foo (bar |baz) (quux _zot) mumble)" "(foo (bar |zot) mumble)"))))
+      ("(foo (bar |baz) (quux _zot) mumble)" "(foo (bar |zot) mumble)")
+      ("(foo bar    ;baz| quux\n     zot_)" error)
+      ("(foo bar    ;baz| quux\n     _zot\n     mumble)"
+       "(foo bar    ;baz|zot\n     mumble)")
+      ("(foo bar| baz    ;quux (_)\n     zot)" error)
+      ("(foo bar| baz    ;quux ()_\n     zot)"
+       "(foo bar|\n     zot)"))))
 
 (defun paredit-canary-indent-method (state indent-point normal-indent)
   (check-parens)



reply via email to

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