diff options
| author | F. Jason Park <jp@neverwas.me> | 2022-12-11 19:41:43 -0800 |
|---|---|---|
| committer | F. Jason Park <jp@neverwas.me> | 2022-12-14 06:40:55 -0800 |
| commit | 44b04c0ac1caef2283076d0784e0407940c14287 (patch) | |
| tree | f8f8067b363d87da479221fb85538a0242de33a3 /test/lisp/erc/erc-scenarios-base-netid-samenet.el | |
| parent | 75f26646d4a569cfb485de4baddcda66ff44b2c3 (diff) | |
| download | emacs-44b04c0ac1caef2283076d0784e0407940c14287.tar.gz emacs-44b04c0ac1caef2283076d0784e0407940c14287.tar.bz2 emacs-44b04c0ac1caef2283076d0784e0407940c14287.zip | |
Actually accept non-symbols as IDs in erc-open
* lisp/erc/erc.el (erc-generate-new-buffer-name): Despite what it says
in the documentation, only symbols were being accepted as valid `:id'
entry-point arguments. This uses the interned `princ' representation
of the argument instead.
* test/lisp/erc/erc-scenarios-base-netid-samenet.el
(erc-scenarios-common--base-network-id-same-network): Randomly specify
a string for the ID param instead of a non-nil symbol when opening a
new connection.
* test/lisp/erc/resources/erc-scenarios-common.el
(erc-scenarios-common-assert-initial-buf-name): Adjust helper to allow
for non-symbol IDs. (Bug#59976.)
Diffstat (limited to 'test/lisp/erc/erc-scenarios-base-netid-samenet.el')
| -rw-r--r-- | test/lisp/erc/erc-scenarios-base-netid-samenet.el | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/test/lisp/erc/erc-scenarios-base-netid-samenet.el b/test/lisp/erc/erc-scenarios-base-netid-samenet.el index 3cd8b7dfa14..14367122510 100644 --- a/test/lisp/erc/erc-scenarios-base-netid-samenet.el +++ b/test/lisp/erc/erc-scenarios-base-netid-samenet.el @@ -40,6 +40,9 @@ (erc-server-flood-margin 30) erc-serv-buf-a erc-serv-buf-b) + (when (and id-a (zerop (random 2))) (setq id-a (symbol-name id-a))) + (when (and id-b (zerop (random 2))) (setq id-b (symbol-name id-b))) + (ert-info ("Connect to foonet with nick tester") (with-current-buffer (setq erc-serv-buf-a (erc :server "127.0.0.1" |