Commit c73e6a31 authored by João Távora's avatar João Távora
Browse files

More helpful docstrings for tests of electric-tests.el

* test/lisp/electric-tests.el (electric-pair-define-test-form):
Improve automatically generated docstring.
parent e18600df
......@@ -114,14 +114,30 @@
mode
extra-desc))
()
,(format "With |%s|, try input %c at point %d. \
Should %s |%s| and point at %d"
,(format "Electricity test in a `%s' buffer.\n
Start with point at %d in a %d-char-long buffer
like this one:
|%s| (buffer start and end are denoted by `|')
%s
%s
Now press the key for: %c
The buffer's contents should %s:
|%s|
, and point should be at %d."
mode
(1+ pos)
(length fixture)
fixture
(if fixture-fn (format "\nNow call this:\n\n%s"
(pp-to-string fixture-fn)) "")
(if bindings (format "\nEnsure the following bindings:\n\n%s"
(pp-to-string bindings)) "")
char
(1+ pos)
(if (string= fixture expected-string)
"stay"
"become")
(if (string= fixture expected-string) "stay" "become")
(replace-regexp-in-string "\n" "\\\\n" expected-string)
expected-point)
(electric-pair-test-for ,fixture
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment