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

arguments.

diff --git a/lisp/mail/rmail.el b/lisp/mail/rmail.el
index 462919d36d4ea73344159bb5d897aadbe199a8eb..5bd5a11a26c1fa519019cbe9eb2548f286e867a6 100644 (file)
--- 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))