[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[nongnu] elpa/paredit 1045e15 117/224: Add trivial tests for `paredit-op
From: |
ELPA Syncer |
Subject: |
[nongnu] elpa/paredit 1045e15 117/224: Add trivial tests for `paredit-open-...' with prefix arguments. |
Date: |
Sat, 7 Aug 2021 09:22:31 -0400 (EDT) |
branch: elpa/paredit
commit 1045e150a69bd423514bbfbd93d51fb42deb8ef3
Author: Taylor R Campbell <campbell@mumble.net>
Commit: Taylor R Campbell <campbell@mumble.net>
Add trivial tests for `paredit-open-...' with prefix arguments.
Ignore-this: fe896b5633ffd3c34448b69b4ad149ea
darcs-hash:20110409193801-00fcc-6fa903a5a00ced144e483b5fcd36e11e2c88e088
---
test.el | 23 ++++++++++++++++++++++-
1 file changed, 22 insertions(+), 1 deletion(-)
diff --git a/test.el b/test.el
index cfbe678..62f8f61 100644
--- a/test.el
+++ b/test.el
@@ -80,7 +80,6 @@ Four arguments: the paredit command, the text of the buffer
examples)))))
;++ Test `paredit-open-...' with the region active.
-;++ Test `paredit-open-...' with prefix arguments.
(paredit-test-bracketed '((paredit-open-round ?\( ?\))
(paredit-open-square ?\[ ?\])
@@ -98,6 +97,28 @@ Four arguments: the paredit command, the text of the buffer
("foo|" "foo (|)")
("|foo" "(|) foo")))
+(let ((current-prefix-arg 1))
+ (paredit-test-bracketed '((paredit-open-round ?\( ?\))
+ (paredit-open-square ?\[ ?\])
+ (paredit-open-curly ?\{ ?\})
+ ;; (paredit-open-angled ?\< ?\>)
+ )
+ '(("(foo |bar baz)" "(foo (|bar) baz)")
+ ("(x |;y\n z\n w)"
+ "(x (| ;y\n z)\n w)"))))
+
+(let ((current-prefix-arg '(4)))
+ (paredit-test-bracketed '((paredit-open-round ?\( ?\))
+ (paredit-open-square ?\[ ?\])
+ (paredit-open-curly ?\{ ?\})
+ ;; (paredit-open-angled ?\< ?\>)
+ )
+ '(("(foo |bar baz)" "(foo (|bar baz))")
+ ("(x |;y\n z\n w)"
+ "(x (| ;y\n z\n w))")
+ ("foo |bar baz" "foo (|bar baz)")
+ ("foo\n|bar\nbaz\n;quux\n" "foo\n(|bar\n baz)\n;quux\n"))))
+
(paredit-test-bracketed '((paredit-close-round ?\( ?\))
(paredit-close-square ?\[ ?\])
(paredit-close-curly ?\{ ?\})
- [nongnu] elpa/paredit 2a94a48 103/224: Set `indent-tabs-mode' and `current-column' in `paredit-test'., (continued)
- [nongnu] elpa/paredit 2a94a48 103/224: Set `indent-tabs-mode' and `current-column' in `paredit-test'., ELPA Syncer, 2021/08/07
- [nongnu] elpa/paredit e06ab40 063/224: Spell `paredit-recenter-on-sexp' to match convention in Emacs., ELPA Syncer, 2021/08/07
- [nongnu] elpa/paredit 0a7619c 089/224: Fix `imbalanced' -> `unbalanced' in `paredit-kill-ring-save' docstring., ELPA Syncer, 2021/08/07
- [nongnu] elpa/paredit 9faf474 073/224: Use `scan-sexps' for noninteractive `check-parens'., ELPA Syncer, 2021/08/07
- [nongnu] elpa/paredit a79aa2c 082/224: Fix end-of-line and end-of-buffer corner cases of `paredit-semicolon'., ELPA Syncer, 2021/08/07
- [nongnu] elpa/paredit 8a85899 098/224: Omit vestigial debugging message from `paredit-test' in test.el., ELPA Syncer, 2021/08/07
- [nongnu] elpa/paredit 678d843 107/224: Make the exhortation about bug reports slightly less harsh., ELPA Syncer, 2021/08/07
- [nongnu] elpa/paredit f5e7959 081/224: Show point in `paredit-splice-sexp-killing-forward' example., ELPA Syncer, 2021/08/07
- [nongnu] elpa/paredit 4800e25 101/224: Use `let*' rather than `let' in `paredit-indent-sexps'., ELPA Syncer, 2021/08/07
- [nongnu] elpa/paredit dd8c16f 105/224: Omit vestigial unattached asterisk in summary at top., ELPA Syncer, 2021/08/07
- [nongnu] elpa/paredit 1045e15 117/224: Add trivial tests for `paredit-open-...' with prefix arguments.,
ELPA Syncer <=
- [nongnu] elpa/paredit 67a3f00 126/224: Support setting the mark in test cases, indicated by an underscore., ELPA Syncer, 2021/08/07
- [nongnu] elpa/paredit b558286 138/224: Add character deletion tests to verify the new `paredit-in-char-p'., ELPA Syncer, 2021/08/07
- [nongnu] elpa/paredit 73e664e 119/224: Add test for C-u ( with trailing comment and no trailing newline., ELPA Syncer, 2021/08/07
- [nongnu] elpa/paredit aa42c19 140/224: Tweak a `paredit-reindent-defun' test slightly., ELPA Syncer, 2021/08/07
- [nongnu] elpa/paredit 36c9a82 142/224: Add regression test for `paredit-convolute-sexp' screw case., ELPA Syncer, 2021/08/07
- [nongnu] elpa/paredit 4cb9112 144/224: Fix `kill-line' tests now that `show-trailing-whitespace' is nil., ELPA Syncer, 2021/08/07
- [nongnu] elpa/paredit d2215ef 146/224: Add message to top of `paredit-test' reporting what we're testing., ELPA Syncer, 2021/08/07
- [nongnu] elpa/paredit fc7c6aa 147/224: Add trivial check.sh to compile paredit and run tests., ELPA Syncer, 2021/08/07
- [nongnu] elpa/paredit 21ec511 154/224: Bump version: 23 beta -> 24 beta., ELPA Syncer, 2021/08/07
- [nongnu] elpa/paredit 6484222 157/224: Add notes for paredit 23 to NEWS., ELPA Syncer, 2021/08/07