mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

(rmail-get-new-mail): Remove useless use of

Browse source 
format.
This commit is contained in:
Andreas Schwab 2004-02-08 22:36:05 +00:00
parent f39a98f445
commit 527a574624
1 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lisp/mail/rmail.el
View file

@ -1488,11 +1488,11 @@ It returns t if it got any new messages."
;; print out a message on number of spam messages found:
(if (and rmail-use-spam-filter (> rsf-number-of-spam 0))
(if (= 1 new-messages)
(format ", and found to be a spam message")
", and found to be a spam message"
(if (> rsf-number-of-spam 1)
(format ", %d of which found to be spam messages"
rsf-number-of-spam)
(format ", one of which found to be a spam message")))
", one of which found to be a spam message"))
""))
(if (and rmail-use-spam-filter (> rsf-number-of-spam 0))
(progn (if rmail-spam-filter-beep (beep t))