[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[nongnu] elpa/paredit 146a434 194/224: Add some slurp tests with charact
From: |
ELPA Syncer |
Subject: |
[nongnu] elpa/paredit 146a434 194/224: Add some slurp tests with characters and strings. |
Date: |
Sat, 7 Aug 2021 09:22:48 -0400 (EDT) |
branch: elpa/paredit
commit 146a43469c968dad01b75aca479c4938d89ee8e4
Author: Taylor R Campbell <campbell@mumble.net>
Commit: Taylor R Campbell <campbell@mumble.net>
Add some slurp tests with characters and strings.
---
test.el | 36 ++++++++++++++++++++++++++++++++++--
1 file changed, 34 insertions(+), 2 deletions(-)
diff --git a/test.el b/test.el
index c42f018..235fb81 100644
--- a/test.el
+++ b/test.el
@@ -1254,7 +1254,23 @@ Four arguments: the paredit command, the text of the
buffer
("\"\"| \"\"" error)
("\"\" |\"\"" error)
;; ("\"\" \"|\"" error) ;++ Urk...
- ("\"\" \"\"|" error)))
+ ("\"\" \"\"|" error)
+ ("|(#\\x) y" error)
+ ("(|#\\x) y" "(|#\\x y)")
+ ("(#|\\x) y" "(#|\\x y)")
+ ("(#\\|x) y" "(#\\|x y)")
+ ("(#\\x|) y" "(#\\x| y)")
+ ("(#\\x)| y" error)
+ ("(#\\x) |y" error)
+ ("(#\\x) y|" error)
+ ("|(\"x\") y" error)
+ ("(|\"x\") y" "(|\"x\" y)")
+ ("(\"|x\") y" "(\"|x\" y)" "(\"|x y\")")
+ ("(\"x|\") y" "(\"x|\" y)" "(\"x| y\")")
+ ("(\"x\"|) y" "(\"x\"| y)")
+ ("(\"x\")| y" error)
+ ("(\"x\") |y" error)
+ ("(\"x\") y|" error)))
(paredit-test 'paredit-backward-slurp-sexp
'(("|" error)
@@ -1303,7 +1319,23 @@ Four arguments: the paredit command, the text of the
buffer
("\"\"| \"\"" error)
("\"\" |\"\"" error)
("\"\" \"|\"" "\"\\\"\\\"|\"")
- ("\"\" \"\"|" error)))
+ ("\"\" \"\"|" error)
+ ("|x (#\\y)" error)
+ ("x| (#\\y)" error)
+ ("x |(#\\y)" error)
+ ("x (|#\\y)" "(x |#\\y)")
+ ("x (#|\\y)" "(x #|\\y)")
+ ("x (#\\|y)" "(x #\\|y)")
+ ("x (#\\y|)" "(x #\\y|)")
+ ("x (#\\y)|" error)
+ ("|x (\"y\")" error)
+ ("x| (\"y\")" error)
+ ("x |(\"y\")" error)
+ ("x (|\"y\")" "(x |\"y\")")
+ ("x (\"|y\")" "(x \"|y\")" "(\"x |y\")")
+ ("x (\"y|\")" "(x \"y|\")" "(\"x y|\")")
+ ("x (\"y\"|)" "(x \"y\"|)")
+ ("x (\"y\")|" error)))
(defun paredit-canary-indent-method (state indent-point normal-indent)
(check-parens)
- [nongnu] elpa/paredit 4fdd1b7 172/224: In test.el, use (delete-char -1), not backward-delete-char., (continued)
- [nongnu] elpa/paredit 4fdd1b7 172/224: In test.el, use (delete-char -1), not backward-delete-char., ELPA Syncer, 2021/08/07
- [nongnu] elpa/paredit 4c7ac6e 173/224: Avoid `backward-delete-char', which GNU Emacs 24 broke., ELPA Syncer, 2021/08/07
- [nongnu] elpa/paredit db99ca6 176/224: Note `backward-delete-char' lossage in NEWS., ELPA Syncer, 2021/08/07
- [nongnu] elpa/paredit aa26b48 181/224: Make sure M-? leaves space appropriately when there was none., ELPA Syncer, 2021/08/07
- [nongnu] elpa/paredit da5b1e0 183/224: Flesh out paredit-wrap-... tests a little., ELPA Syncer, 2021/08/07
- [nongnu] elpa/paredit 3ab28ec 185/224: Revert "Bind M-[ to paredit-wrap-square.", ELPA Syncer, 2021/08/07
- [nongnu] elpa/paredit c33e134 186/224: Fix reference to `backward-down-list', which is no more., ELPA Syncer, 2021/08/07
- [nongnu] elpa/paredit e775e43 187/224: Tweak whitespace in `paredit-split-sexp'. No functional change., ELPA Syncer, 2021/08/07
- [nongnu] elpa/paredit 66d6374 189/224: Tweak HTML output a little more., ELPA Syncer, 2021/08/07
- [nongnu] elpa/paredit f8bf24c 192/224: Allow slurping while in a character., ELPA Syncer, 2021/08/07
- [nongnu] elpa/paredit 146a434 194/224: Add some slurp tests with characters and strings.,
ELPA Syncer <=
- [nongnu] elpa/paredit c92197a 196/224: Tweak comment about barfage error., ELPA Syncer, 2021/08/07
- [nongnu] elpa/paredit 67d6a4f 202/224: Let C-d and DEL delete the other spurious delimiters too., ELPA Syncer, 2021/08/07
- [nongnu] elpa/paredit ad27e64 203/224: Remove beta marker from 24 in NEWS., ELPA Syncer, 2021/08/07
- [nongnu] elpa/paredit aec81db 206/224: Quote M-mode-hook for add-hook in example .emacs fragment., ELPA Syncer, 2021/08/07
- [nongnu] elpa/paredit 2f6f672 210/224: Add email address., ELPA Syncer, 2021/08/07
- [nongnu] elpa/paredit 6ee9f06 213/224: Bump copyright year to 2017., ELPA Syncer, 2021/08/07
- [nongnu] elpa/paredit 0b523c3 215/224: Switch http://mumble.net to https://mumble.net., ELPA Syncer, 2021/08/07
- [nongnu] elpa/paredit 8330a41 224/224: Use `-q --no-site-file' for genhtml.sh too., ELPA Syncer, 2021/08/07