Unset mode-line-process for all buffers on reconnecting

* rcirc.el (rcirc-sentinel): Add loop over all managed buffers

diff --git a/lisp/net/rcirc.el b/lisp/net/rcirc.el
index 5537ddca108ba78b19e163845acf32b8a6d005bf..b0374a545cd84417022c4a928ad1e83d291a901a 100644 (file)
--- a/lisp/net/rcirc.el
+++ b/lisp/net/rcirc.el
@@ -900,7 +900,9 @@ If QUIET is non-nil, no not emit a message."
             (setq rcirc-reconnection-timer nil))
 
           (message "Connecting to %s...done" (or server-alias server))
-          (setq mode-line-process nil)))
+          (dolist (buffer (cons nil (mapcar 'cdr rcirc-buffer-alist)))
+           (with-current-buffer (or buffer (current-buffer))
+             (setq mode-line-process nil)))))
        ((string= sentinel "deleted")
         (let ((now (current-time)))
           (with-rcirc-process-buffer process