diff options
| author | Olivier Certner <olce.emacs@certner.fr> | 2021-07-06 10:51:57 +0200 |
|---|---|---|
| committer | Amin Bandali <bandali@gnu.org> | 2021-08-02 22:34:25 -0400 |
| commit | 75ecce4323e8072a2d91a882d0368af9cdfd9df7 (patch) | |
| tree | 1dfda3e59453d62487a5ebf7b3567e362f777e78 | |
| parent | 61def1e392b3e0483d3a2fab5eed123a00a9f0b8 (diff) | |
| download | emacs-75ecce4323e8072a2d91a882d0368af9cdfd9df7.tar.gz | |
Unbreak ERC's Ibuffer filter (Bug#44100)
* lisp/erc/erc-ibuffer.el (erc-modified): Don't use `length' on dotted
lists (and not even to test if there is more than one element, for
that matter). Use `cdr' instead.
| -rw-r--r-- | lisp/erc/erc-ibuffer.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/erc/erc-ibuffer.el b/lisp/erc/erc-ibuffer.el index f5b1f6a2a65..8ff548de29d 100644 --- a/lisp/erc/erc-ibuffer.el +++ b/lisp/erc/erc-ibuffer.el @@ -77,7 +77,7 @@ erc-track-mode) (let ((entry (assq (current-buffer) erc-modified-channels-alist))) (if entry - (if (> (length entry) 1) + (if (cdr entry) (cond ((eq 'pal (nth 1 entry)) (string erc-ibuffer-pal-char)) ((eq 'fool (nth 1 entry)) |