(rmail-get-new-mail): Remove extra format string

arguments.

1 files changed, 3 insertions, 5 deletions

diff --git a/lisp/mail/rmail.el b/lisp/mail/rmail.el
index 462919d36d4..5bd5a11a26c 100644
--- a/lisp/mail/rmail.el
+++ b/lisp/mail/rmail.el
@@ -1,6 +1,6 @@
 ;;; rmail.el --- main code of "RMAIL" mail reader for Emacs
 
-;; Copyright (C) 1985,86,87,88,93,94,95,96,97,98,2000, 2001
+;; Copyright (C) 1985,86,87,88,93,94,95,96,97,98,2000, 01, 2004
 ;;              Free Software Foundation, Inc.
 
 ;; Maintainer: FSF
@@ -1488,13 +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"
-                                         rsf-number-of-spam)
+                                 (format ", 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"
-                                         rsf-number-of-spam)))
+                                 (format ", 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))