(rmail-convert-to-babyl-format): Fix the last change.

1 files changed, 3 insertions, 3 deletions

diff --git a/lisp/mail/rmail.el b/lisp/mail/rmail.el
index e1a180190ec..009050b1fbd 100644
--- a/lisp/mail/rmail.el
+++ b/lisp/mail/rmail.el
@@ -1729,7 +1729,7 @@ It returns t if it got any new messages."
                              "\n")))
                (narrow-to-region (point) (point-max))
                (and (= 0 (% count 10))
-                    (message "Converting to Babyl...%d" count)))
+                    (message "Converting to Babyl format...%d" count)))
               ;;*** MMDF format
               ((let ((case-fold-search t))
                  (looking-at rmail-mmdf-delim1))
@@ -1756,7 +1756,7 @@ It returns t if it got any new messages."
                (narrow-to-region (point) (point-max))
                (setq count (1+ count))
                (and (= 0 (% count 10))
-                    (message "Converting to Babyl...%d" count)))
+                    (message "Converting to Babyl format...%d" count)))
               ;;*** Mail format
               ((looking-at "^From ")
                (insert "\^L\n0, unseen,,\n*** EOOH ***\n")
@@ -1864,7 +1864,7 @@ It returns t if it got any new messages."
                          "\n"))
                (narrow-to-region (point) (point-max))
                (and (= 0 (% count 10))
-                    (message "Converting to Babyl...%d" count)))
+                    (message "Converting to Babyl format...%d" count)))
               ;;
               ;; This kludge is because some versions of sendmail.el
               ;; insert an extra newline at the beginning that shouldn't