From 827b77e90f4f3a86abfc82a07a8319f5f4cfb3d3 Mon Sep 17 00:00:00 2001 From: Deniz Dogan Date: Sat, 5 Feb 2011 22:07:26 +0100 Subject: [PATCH] * lisp/net/rcirc.el (rcirc-handler-JOIN): Reset mode-line-process (Bug#6386). --- lisp/ChangeLog | 5 +++++ lisp/net/rcirc.el | 5 ++++- 2 files changed, 9 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 2c514d535a7..5625fd4dc16 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2011-02-05 Deniz Dogan + + * net/rcirc.el (rcirc-handler-JOIN): Reset mode-line-process + (Bug#6386). + 2011-02-05 Stefan Monnier * progmodes/sh-script.el (sh-here-doc-open-re): Don't rely on the diff --git a/lisp/net/rcirc.el b/lisp/net/rcirc.el index 0e44508641b..87db130f1ea 100644 --- a/lisp/net/rcirc.el +++ b/lisp/net/rcirc.el @@ -2455,7 +2455,10 @@ keywords when no KEYWORD is given." (rcirc-elapsed-lines process sender channel))) (when (and last-activity-lines (< last-activity-lines rcirc-omit-threshold)) - (rcirc-last-line process sender channel))))) + (rcirc-last-line process sender channel)))) + ;; reset mode-line-process in case joining a channel with an + ;; already open buffer (after getting kicked e.g.) + (setq mode-line-process nil)) (rcirc-print process sender "JOIN" channel "") -- 2.39.2