# HG changeset patch
# User Eli Zaretskii <eliz@gnu.org>
# Date 1066323288 0
# Node ID 36bc6bf83146e965edfb053772fde979edb6f097
# Parent  d26ce3614865e2e886ae9abceb6e822c2f3f08bb
(rmail-convert-to-babyl-format): Fix the last change.

diff -r d26ce3614865 -r 36bc6bf83146 lisp/mail/rmail.el
--- a/lisp/mail/rmail.el	Thu Oct 16 16:49:59 2003 +0000
+++ b/lisp/mail/rmail.el	Thu Oct 16 16:54:48 2003 +0000
@@ -1729,7 +1729,7 @@
 			     "\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 @@
 	       (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 @@
 			 "\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