diff options
| -rw-r--r-- | lisp/erc/ChangeLog | 1 | ||||
| -rw-r--r-- | lisp/erc/erc-list.el | 3 |
2 files changed, 3 insertions, 1 deletions
diff --git a/lisp/erc/ChangeLog b/lisp/erc/ChangeLog index 93d958d765d..d07bc341c92 100644 --- a/lisp/erc/ChangeLog +++ b/lisp/erc/ChangeLog | |||
| @@ -1,6 +1,7 @@ | |||
| 1 | 2013-09-19 Glenn Morris <rgm@gnu.org> | 1 | 2013-09-19 Glenn Morris <rgm@gnu.org> |
| 2 | 2 | ||
| 3 | * erc-button.el (erc-button-click-button, erc-button-press-button): | 3 | * erc-button.el (erc-button-click-button, erc-button-press-button): |
| 4 | * erc-list.el (erc-list-handle-322): | ||
| 4 | Mark unused arguments. | 5 | Mark unused arguments. |
| 5 | 6 | ||
| 6 | * erc.el (erc-open-server-buffer-p): Actually use the `buffer' arg. | 7 | * erc.el (erc-open-server-buffer-p): Actually use the `buffer' arg. |
diff --git a/lisp/erc/erc-list.el b/lisp/erc/erc-list.el index c243073790e..6349772a59f 100644 --- a/lisp/erc/erc-list.el +++ b/lisp/erc/erc-list.el | |||
| @@ -164,7 +164,8 @@ | |||
| 164 | 164 | ||
| 165 | ;; Handle a "322" response. This response tells us about a single | 165 | ;; Handle a "322" response. This response tells us about a single |
| 166 | ;; channel. | 166 | ;; channel. |
| 167 | (defun erc-list-handle-322 (proc parsed) | 167 | ;; Called via erc-once-with-server-event with two arguments. |
| 168 | (defun erc-list-handle-322 (_proc parsed) | ||
| 168 | (let* ((args (cdr (erc-response.command-args parsed))) | 169 | (let* ((args (cdr (erc-response.command-args parsed))) |
| 169 | (channel (car args)) | 170 | (channel (car args)) |
| 170 | (nusers (car (cdr args))) | 171 | (nusers (car (cdr args))) |