# HG changeset patch # User Kenichi Handa # Date 866638502 0 # Node ID 5b6f098f3d32d56c7d6a9356846dd382e296b554 # Parent 9fd01ad9a05593e238919471fc2cc77166091c5a (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. diff -r 9fd01ad9a055 -r 5b6f098f3d32 lisp/mail/rmail.el --- 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))) ;;