changeset 20947:a66eb4a41765

(rmail-decode-babyl-format): Message modified. (rmail): Comment for the binding of rmail-enable-multibyte added.
author Kenichi Handa <handa@m17n.org>
date Fri, 20 Feb 1998 11:15:28 +0000
parents 3dbeb1555fa7
children a9a9a13079b4
files lisp/mail/rmail.el
diffstat 1 files changed, 5 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/mail/rmail.el	Fri Feb 20 11:14:32 1998 +0000
+++ b/lisp/mail/rmail.el	Fri Feb 20 11:15:28 1998 +0000
@@ -454,6 +454,9 @@
 	       (setq rmail-enable-mime nil))))
   (let* ((file-name (expand-file-name (or file-name-arg rmail-file-name)))
 	 (existed (get-file-buffer file-name))
+	 ;; This binding is necessary because we much decide if we
+	 ;; need code conversion while the buffer is unibyte
+	 ;; (i.e. enable-multibyte-characters is nil).
 	 (rmail-enable-multibyte (default-value 'enable-multibyte-characters))
 	 ;; Since the file may contain messages of different encodings
 	 ;; at the tail (non-BYBYL part), we can't decode them at once
@@ -606,9 +609,9 @@
 	    (goto-char (point))
 	    (setq from (point))
 	    (if (= (% count 10) 0)
-		(message "Decoding messages (%d)..." count))
+		(message "Decoding messages...%d" count))
 	    (setq count (1+ count)))
-	  (message "Decoding messages (%d)...done" count)
+	  (message "Decoding messages...done")
 	  (set-buffer-file-coding-system rmail-file-coding-system)
 	  (set-buffer-modified-p modifiedp)))))