aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/erc/erc-backend.el3
1 files changed, 3 insertions, 0 deletions
diff --git a/lisp/erc/erc-backend.el b/lisp/erc/erc-backend.el
index df957d1ce42..06a23e80fdd 100644
--- a/lisp/erc/erc-backend.el
+++ b/lisp/erc/erc-backend.el
@@ -703,6 +703,9 @@ Conditionally try to reconnect and take appropriate action."
703 (setq erc-server-ping-handler nil))) 703 (setq erc-server-ping-handler nil)))
704 (run-hook-with-args 'erc-disconnected-hook 704 (run-hook-with-args 'erc-disconnected-hook
705 (erc-current-nick) (system-name) "") 705 (erc-current-nick) (system-name) "")
706 (dolist (buf (erc-buffer-filter (lambda () (boundp 'erc-channel-users)) cproc))
707 (with-current-buffer buf
708 (setq erc-channel-users (make-hash-table :test 'equal))))
706 ;; Remove the prompt 709 ;; Remove the prompt
707 (goto-char (or (marker-position erc-input-marker) (point-max))) 710 (goto-char (or (marker-position erc-input-marker) (point-max)))
708 (forward-line 0) 711 (forward-line 0)