Flesh out paredit-wrap-... tests a little.

1 files changed, 8 insertions, 0 deletions

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))