diff options
| author | F. Jason Park <jp@neverwas.me> | 2022-08-17 00:00:53 -0700 |
|---|---|---|
| committer | F. Jason Park <jp@neverwas.me> | 2022-09-19 17:54:46 -0700 |
| commit | e98465e5418497a925e795c358231a4d70d6e5ff (patch) | |
| tree | 2e7eb36aedea441d7d359e0a4f6962e782e7b77c /lisp/erc | |
| parent | 33fdb1daa354e5045e6e4a798db18d2ba1fbc38b (diff) | |
| download | emacs-e98465e5418497a925e795c358231a4d70d6e5ff.tar.gz emacs-e98465e5418497a925e795c358231a4d70d6e5ff.tar.bz2 emacs-e98465e5418497a925e795c358231a4d70d6e5ff.zip | |
Stabilize channels variant of erc-reuse-buffers test
* lisp/erc/erc-networks.el (erc-networks--id-sort-buffers): Use
`buffer-local-value' instead of `with-current-buffer'.
* test/lisp/erc/erc-scenarios-base-reuse-buffers.el
(erc-scenarios-common--base-reuse-buffers-channel-buffers): Wait for
buffers to be created by server-initiated JOINs.
(erc-scenarios-base-reuse-buffers-channel-buffers--disabled): Remove
`:unstable' tag.
* test/lisp/erc-tests.el (erc-ring-previous-command): Remove
unnecessary `goto-char'.
Diffstat (limited to 'lisp/erc')
| -rw-r--r-- | lisp/erc/erc-networks.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/erc/erc-networks.el b/lisp/erc/erc-networks.el index c54b12fcb0b..2c8f8fb72bb 100644 --- a/lisp/erc/erc-networks.el +++ b/lisp/erc/erc-networks.el @@ -996,8 +996,8 @@ Rename the current buffer if its NID has grown." "Return a list of target BUFFERS, newest to oldest." (sort buffers (lambda (a b) - (> (with-current-buffer a (erc-networks--id-ts erc-networks--id)) - (with-current-buffer b (erc-networks--id-ts erc-networks--id)))))) + (> (erc-networks--id-ts (buffer-local-value 'erc-networks--id a)) + (erc-networks--id-ts (buffer-local-value 'erc-networks--id b)))))) ;;;; Buffer association |