*** empty log message ***

[gnus] / lisp / gnus-kill.el

diff --git a/lisp/gnus-kill.el b/lisp/gnus-kill.el
index 23d1dfe..781651a 100644 (file)
--- a/lisp/gnus-kill.el
+++ b/lisp/gnus-kill.el
@@ -389,6 +389,8 @@ Returns the number of articles marked as read."
              (message "Processing kill file %s...done" (car kill-files)))
            (setq kill-files (cdr kill-files)))))
 
+      (gnus-set-mode-line 'summary)
+
       (if beg
          (let ((nunreads (- unreads (length gnus-newsgroup-unreads))))
            (or (eq nunreads 0)