Commit fc3c34a8 authored by Kenichi Handa's avatar Kenichi Handa
Browse files

(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.
parent f3203589
......@@ -392,14 +392,6 @@ by substituting the new message number into the existing list.")
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.
......@@ -898,7 +890,7 @@ Instead, these commands are available:
;; 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 @@ Optional DEFAULT is password to start with."
(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 @@ Optional DEFAULT is password to start with."
(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)))
;;
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment