aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorEli Zaretskii2009-04-04 14:22:59 +0000
committerEli Zaretskii2009-04-04 14:22:59 +0000
commit435f0dd2f5b673f238f75f04d835f72fa5be8cfa (patch)
treeab097b45d57da956577bdc081217f2fe95a0a1f3
parent6af84d777e13f45af34ffe9c11aa17d53b273747 (diff)
downloademacs-435f0dd2f5b673f238f75f04d835f72fa5be8cfa.tar.gz
emacs-435f0dd2f5b673f238f75f04d835f72fa5be8cfa.zip
(rmail-new-summary-1): Don't show zero count of summary lines.
-rw-r--r--lisp/ChangeLog5
-rw-r--r--lisp/mail/rmailsum.el3
2 files changed, 7 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index f02ca12b5e6..7bd468c2752 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
12009-04-04 Eli Zaretskii <eliz@gnu.org>
2
3 * mail/rmailsum.el (rmail-new-summary-1): Don't show zero count of
4 summary lines.
5
12009-04-02 Chong Yidong <cyd@stupidchicken.com> 62009-04-02 Chong Yidong <cyd@stupidchicken.com>
2 7
3 * dired.el (dired-get-filename): Always pass filename through 8 * dired.el (dired-get-filename): Always pass filename through
diff --git a/lisp/mail/rmailsum.el b/lisp/mail/rmailsum.el
index 3c9d3e54709..c35e4856f9c 100644
--- a/lisp/mail/rmailsum.el
+++ b/lisp/mail/rmailsum.el
@@ -291,7 +291,8 @@ message."
291 summary-msgs)))) 291 summary-msgs))))
292 (setq msgnum (1+ msgnum)) 292 (setq msgnum (1+ msgnum))
293 ;; Provide a periodic User progress message. 293 ;; Provide a periodic User progress message.
294 (if (zerop (% rmail-new-summary-line-count 10)) 294 (if (and (not (zerop rmail-new-summary-line-count))
295 (zerop (% rmail-new-summary-line-count 10)))
295 (message "Computing summary lines...%d" 296 (message "Computing summary lines...%d"
296 rmail-new-summary-line-count))) 297 rmail-new-summary-line-count)))
297 (setq summary-msgs (nreverse summary-msgs))) 298 (setq summary-msgs (nreverse summary-msgs)))