diff options
| author | F. Jason Park | 2024-01-14 13:02:27 -0800 |
|---|---|---|
| committer | F. Jason Park | 2024-01-18 17:06:08 -0800 |
| commit | dd2caf1a7634ea6fd8aebbdc45ea4caf22d786cd (patch) | |
| tree | 19495c4cb5656fd58041da8862c87c8994d00d09 /test/lisp | |
| parent | 13c7933a9d4b26e74e7f5e19d70bb89003239c34 (diff) | |
| download | emacs-dd2caf1a7634ea6fd8aebbdc45ea4caf22d786cd.tar.gz emacs-dd2caf1a7634ea6fd8aebbdc45ea4caf22d786cd.zip | |
Redo doc strings for ERC's entry point commands
* lisp/erc/erc.el: Bump Compat version in Package-Requires header to
29.1.4.4.
(erc-select-read-args): Revise doc string, and update name of internal
`--interactive-env--' entry-point parameter.
(erc, erc-tls): Don't use `&interactive-env' as a variable name, in
case it confuses persons or programs. Overhaul doc string in response
to user complaints. For `erc' specifically, include literal
`:keyword' symbols to help non-Emacs users understand the required
syntax, which isn't obvious without an example, like `erc-tls' has,
and with only "&key" and upcased metasynctatic variables to go by.
(erc--current-buffer-joined-p): Remove assertion.
* test/lisp/erc/erc-scenarios-keep-place-indicator.el
(erc-scenarios-keep-place-indicator--follow): Try waiting for
intermittently failing condition.
* test/lisp/erc/erc-tests.el (erc-select-read-args): Update name of
internal keyword variable.
Diffstat (limited to 'test/lisp')
| -rw-r--r-- | test/lisp/erc/erc-scenarios-keep-place-indicator.el | 4 | ||||
| -rw-r--r-- | test/lisp/erc/erc-tests.el | 6 |
2 files changed, 5 insertions, 5 deletions
diff --git a/test/lisp/erc/erc-scenarios-keep-place-indicator.el b/test/lisp/erc/erc-scenarios-keep-place-indicator.el index b8ff59f4e02..572045cf0bc 100644 --- a/test/lisp/erc/erc-scenarios-keep-place-indicator.el +++ b/test/lisp/erc/erc-scenarios-keep-place-indicator.el | |||
| @@ -85,8 +85,8 @@ | |||
| 85 | (goto-char (window-point)) | 85 | (goto-char (window-point)) |
| 86 | (should (looking-back (rx "<bob> tester, welcome!"))) | 86 | (should (looking-back (rx "<bob> tester, welcome!"))) |
| 87 | (should (= (pos-bol) (window-start))) | 87 | (should (= (pos-bol) (window-start))) |
| 88 | (should (= (overlay-start erc--keep-place-indicator-overlay) | 88 | (erc-d-t-wait-for 20 |
| 89 | (pos-bol)))) | 89 | (= (overlay-start erc--keep-place-indicator-overlay) (pos-bol)))) |
| 90 | ;; Lower window is still centered at start. | 90 | ;; Lower window is still centered at start. |
| 91 | (other-window 1) | 91 | (other-window 1) |
| 92 | (switch-to-buffer "#chan") | 92 | (switch-to-buffer "#chan") |
diff --git a/test/lisp/erc/erc-tests.el b/test/lisp/erc/erc-tests.el index e3e20b7ba8f..49c72836a22 100644 --- a/test/lisp/erc/erc-tests.el +++ b/test/lisp/erc/erc-tests.el | |||
| @@ -2707,7 +2707,7 @@ | |||
| 2707 | (list :server "irc.libera.chat" | 2707 | (list :server "irc.libera.chat" |
| 2708 | :port 6697 | 2708 | :port 6697 |
| 2709 | :nick (user-login-name) | 2709 | :nick (user-login-name) |
| 2710 | '&interactive-env | 2710 | '--interactive-env-- |
| 2711 | '((erc-server-connect-function . erc-open-tls-stream) | 2711 | '((erc-server-connect-function . erc-open-tls-stream) |
| 2712 | (erc-join-buffer . window)))))) | 2712 | (erc-join-buffer . window)))))) |
| 2713 | 2713 | ||
| @@ -2717,7 +2717,7 @@ | |||
| 2717 | (list :server "irc.gnu.org" | 2717 | (list :server "irc.gnu.org" |
| 2718 | :port 6697 | 2718 | :port 6697 |
| 2719 | :nick (user-login-name) | 2719 | :nick (user-login-name) |
| 2720 | '&interactive-env | 2720 | '--interactive-env-- |
| 2721 | '((erc-server-connect-function . erc-open-tls-stream) | 2721 | '((erc-server-connect-function . erc-open-tls-stream) |
| 2722 | (erc-join-buffer . window)))))) | 2722 | (erc-join-buffer . window)))))) |
| 2723 | 2723 | ||
| @@ -2728,7 +2728,7 @@ | |||
| 2728 | (list :server "irc.gnu.org" | 2728 | (list :server "irc.gnu.org" |
| 2729 | :port 6697 | 2729 | :port 6697 |
| 2730 | :nick (user-login-name) | 2730 | :nick (user-login-name) |
| 2731 | '&interactive-env | 2731 | '--interactive-env-- |
| 2732 | '((erc-server-connect-function | 2732 | '((erc-server-connect-function |
| 2733 | . erc-open-tls-stream) | 2733 | . erc-open-tls-stream) |
| 2734 | (erc--display-context | 2734 | (erc--display-context |