diff options
| author | F. Jason Park <jp@neverwas.me> | 2021-10-19 22:53:03 -0700 |
|---|---|---|
| committer | F. Jason Park <jp@neverwas.me> | 2022-06-30 15:03:26 -0700 |
| commit | 529e46f1287ddb6fc16779a3f14016d0c305037c (patch) | |
| tree | 128aed7106490532b8ce5c19a589182b5952de4f /lisp/erc/erc-backend.el | |
| parent | 1c24af0fcb8a8326fe5cdc75672bf4099b191a00 (diff) | |
| download | emacs-529e46f1287ddb6fc16779a3f14016d0c305037c.tar.gz emacs-529e46f1287ddb6fc16779a3f14016d0c305037c.tar.bz2 emacs-529e46f1287ddb6fc16779a3f14016d0c305037c.zip | |
Add eventual replacement for erc-default-recipients
* lisp/erc/erc.el (erc--target, erc--target-channel,
erc--target-channel-local): Add new structs to hold info on a buffer's
target; stored in a local variable of the same name.
(erc--target-from-string): Add standalone constructor for
`erc--target'.
(erc--default-target): Add temporary internal getter to ease
transition to `erc--target' everywhere.
(erc-open): Create above items in non-server buffers.
* lisp/erc/erc-backend.el (erc-server-NICK): Recreate `erc--target'
when necessary.
Diffstat (limited to 'lisp/erc/erc-backend.el')
| -rw-r--r-- | lisp/erc/erc-backend.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/erc/erc-backend.el b/lisp/erc/erc-backend.el index 3534a937b80..bb423eadc0f 100644 --- a/lisp/erc/erc-backend.el +++ b/lisp/erc/erc-backend.el @@ -1427,8 +1427,8 @@ add things to `%s' instead." (erc-buffer-filter (lambda () (when (equal (erc-default-target) nick) - (setq erc-default-recipients - (cons nn (cdr erc-default-recipients))) + (setq erc-default-recipients (cons nn (cdr erc-default-recipients)) + erc--target (erc--target-from-string nn)) (rename-buffer nn t) ; bug#12002 (erc-update-mode-line) (cl-pushnew (current-buffer) bufs)))) |