changeset 18296:5b6f098f3d32

(rmail-enable-decoding-message): Deleted. (rmail-revert): Bind enable-multibyte-characters to nil before calling rmail-convert-file. (rmail-convert-to-babyl-format): If enable-multibyte-characters is nil, do not convert code.

--- a/lisp/mail/rmail.el	Wed Jun 18 12:55:00 1997 +0000
+++ b/lisp/mail/rmail.el	Wed Jun 18 12:55:02 1997 +0000
@@ -393,14 +393,6 @@
 This is set to nil by default.")
 
 ;;;###autoload
-(defvar rmail-enable-decoding-message nil
-  "*If non-nil, RMAIL decode character code of incomming mails automatically.
-The default value is nil.
-
-Regardless of the value of this variable, MIME messages are decoded
-if rmail-enable-mime is non-nil.")
-
-;;;###autoload
 (defcustom rmail-enable-mime nil
   "*If non-nil, RMAIL uses MIME feature.
 If the value is t, RMAIL automatically shows MIME decoded message.
@@ -898,7 +890,7 @@
 	;; But, we don't have to convert coding system because backup
 	;; files should have been saved by Emacs' internal format.
 	(let ((rmail-file-coding-system nil)
-	      (rmail-enable-decoding-message nil))
+	      (enable-multibyte-characters nil))
 	  (rmail-convert-file)
 	  (goto-char (point-max))
 	  (rmail-mode)))))
@@ -1402,7 +1394,7 @@
 		   (while (search-forward "\n\^_" nil t); single char "\^_"
 		     (replace-match "\n^_")))); 2 chars: "^" and "_"
 	       (or rmail-enable-mime
-		   (not rmail-enable-decoding-message)
+		   (not enable-multibyte-characters)
 		   (decode-coding-region start (point) 'undecided))
 	       (narrow-to-region (point) (point-max))
 	       (setq count (1+ count)))
@@ -1465,7 +1457,7 @@
 		     (replace-match "\n^_")))); 2 chars: "^" and "_"
 	       (insert ?\^_)
 	       (or rmail-enable-mime
-		   (not rmail-enable-decoding-message)
+		   (not enable-multibyte-characters)
 		   (decode-coding-region start (point) 'undecided))
 	       (narrow-to-region (point) (point-max)))
 	      ;;