branch: elpa/paredit
commit da5b1e06b77443629e9dcb210a4a53d96f674107
Author: Taylor R Campbell <[email protected]>
Commit: Taylor R Campbell <[email protected]>

    Flesh out paredit-wrap-... tests a little.
---
 test.el | 8 ++++++++
 1 file changed, 8 insertions(+)

diff --git a/test.el b/test.el
index b06bf6c..2125141 100644
--- a/test.el
+++ b/test.el
@@ -170,7 +170,15 @@ Four arguments: the paredit command, the text of the buffer
                           ;; (paredit-wrap-angled ?\< ?\>)
                           )
   '(("|foo" "(|foo)")
+    ("f|oo" "f (|oo)")
+    ("fo|o" "fo (|o)")
     ("|foo bar" "(|foo) bar")
+    ("f|oo bar" "f (|oo) bar")
+    ("fo|o bar" "fo (|o) bar")
+    ("foo| bar" "foo (| bar)")
+    ("foo |bar" "foo (|bar)")
+    ("foo b|ar" "foo b (|ar)")
+    ("foo ba|r" "foo ba (|r)")
     ("|foo bar baz" "(|foo) bar baz")))
 
 (let ((transient-mark-mode t))

Reply via email to