diff options
| author | Lars Ingebrigtsen <larsi@gnus.org> | 2022-05-11 15:02:08 +0200 |
|---|---|---|
| committer | Lars Ingebrigtsen <larsi@gnus.org> | 2022-05-11 15:02:08 +0200 |
| commit | c113f2626e58a1d3b98bdf364902f53caa2dc3a8 (patch) | |
| tree | 9f5f10c453b442a4c574931fceb5802466efc00c | |
| parent | d373daf568cd45153d842de49288eb424e5b32e9 (diff) | |
| download | emacs-c113f2626e58a1d3b98bdf364902f53caa2dc3a8.tar.gz | |
Make recent nicknames erc change more backwards-compatible
* lisp/erc/erc-button.el (erc-button-add-buttons): Make the
nicknames change more backwards-compatible (bug#16271).
| -rw-r--r-- | lisp/erc/erc-button.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/erc/erc-button.el b/lisp/erc/erc-button.el index dcf6a324351..aeada705c4a 100644 --- a/lisp/erc/erc-button.el +++ b/lisp/erc/erc-button.el @@ -254,7 +254,9 @@ specified by `erc-button-alist'." regexp) (erc-button-remove-old-buttons) (dolist (entry alist) - (if (eq (car entry) 'nicknames) + (if (or (eq (car entry) 'nicknames) + ;; Old form retained for backward compatibility. + (equal (car entry) (quote 'nicknames))) (erc-button-add-nickname-buttons entry) (progn (setq regexp (or (and (stringp (car entry)) (car entry)) |