diff options
| author | Taylor R Campbell <campbell@mumble.net> | 2011-04-11 19:04:01 +0000 |
|---|---|---|
| committer | Taylor R Campbell <campbell@mumble.net> | 2011-04-11 19:04:01 +0000 |
| commit | 2463273cabb1ac803ef6765fe2d2f9ec4902ce60 (patch) | |
| tree | dd233b3ba3cadaa92c2e4e59689c1964d1f88009 /test.el | |
| parent | 8d87576f5fe082236f8b9bd180f2cad9df01e043 (diff) | |
Add tests for region deletion across comment boundaries.
Ignore-this: 145763cd2559105046cddd21c3da31d2
darcs-hash:20110411190401-00fcc-44f724d53c52deb35d81b6c3a4bee70ef7d56222
Diffstat (limited to 'test.el')
| -rw-r--r-- | test.el | 8 |
1 files changed, 7 insertions, 1 deletions
@@ -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) |