aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorGlenn Morris <[email protected]>2011-11-13 18:01:00 -0800
committerGlenn Morris <[email protected]>2011-11-13 18:01:00 -0800
commitd3cfca60276d7d1e29cb2ee5e7729141b86b2fb5 (patch)
treea217fa0ff13f01ab44091e1a95908b8aa9557883
parent71e027ac2d510f3616fe8d0572376c2d7f91c2f8 (diff)
* lisp/mail/rmail.el (rmail-no-mail-p): Remove mode-line N/M indicator.
-rw-r--r--lisp/ChangeLog2
-rw-r--r--lisp/mail/rmail.el2
2 files changed, 4 insertions, 0 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 676c0c6b18..ea27df043f 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,7 @@
2011-11-14 Glenn Morris <[email protected]>
+ * mail/rmail.el (rmail-no-mail-p): Remove mode-line N/M indicator.
+
* mail/rmailsum.el (rmail-summary, rmail-new-summary)
(rmail-new-summary-1): Allow empty summaries. (Bug#9964)
(rmail-new-summary): Remember that rmail-summary-buffer is buffer-local.
diff --git a/lisp/mail/rmail.el b/lisp/mail/rmail.el
index 4b3441a8cd..76c9b87f88 100644
--- a/lisp/mail/rmail.el
+++ b/lisp/mail/rmail.el
@@ -2602,6 +2602,8 @@ Ask the user whether to add that list name to `mail-mailing-lists'."
"Return nil if there is mail, else \"No mail.\"."
(if (zerop rmail-total-messages)
(save-excursion
+ ;; Eg we deleted all the messages, so remove the old N/M mark.
+ (with-current-buffer rmail-buffer (setq mode-line-process nil))
(with-current-buffer rmail-view-buffer
(erase-buffer)
"No mail."))))