From: tomo <tomo>
Date: Tue, 19 Dec 2000 05:25:18 +0000 (+0000)
Subject: (mh-display-msg): Use `raw-text-insert-file-contents' instead of
X-Git-Tag: semi21-1_14_0-1~24
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=eb99885db4ba316e540ec61d0e6a6a9fc97030ee;p=elisp%2Flemi.git

(mh-display-msg): Use `raw-text-insert-file-contents' instead of
`insert-file-contents-as-raw-text'; use `mime-decode-header-in-buffer'
instead of `eword-decode-header'.
(emh-request-partial-message): Use `raw-text-insert-file-contents'
instead of `insert-file-contents-as-raw-text'.
---

diff --git a/mime/emh.el b/mime/emh.el
index 22a2d7e..084ffa2 100644
--- a/mime/emh.el
+++ b/mime/emh.el
@@ -104,7 +104,7 @@ nil, `emh-automatic-mime-preview' is used as default value."
 		   (set-buffer abuf)
 		   (set-buffer-multibyte nil)
 		   )
-		 (insert-file-contents-as-raw-text msg-filename)
+		 (raw-text-insert-file-contents msg-filename)
 		 (set-buffer-modified-p nil)
 		 (setq buffer-read-only t)
 		 (setq buffer-file-name msg-filename)
@@ -135,8 +135,7 @@ nil, `emh-automatic-mime-preview' is used as default value."
 		     (t
 		      (mh-start-of-uncleaned-message)))
 	       (if emh-decode-encoded-word
-		   (eword-decode-header)
-		 )
+		   (mime-decode-header-in-buffer))
 	       (set-buffer-modified-p nil)
 	       (setq buffer-read-only t)
 	       (setq buffer-file-name msg-filename)
@@ -287,7 +286,7 @@ digest are inserted into the folder after that message."
     (set-buffer (get-buffer-create " *Partial Article*"))
     (erase-buffer)
     (setq mime-preview-buffer show-buffer)
-    (insert-file-contents-as-raw-text msg-filename)
+    (raw-text-insert-file-contents msg-filename)
     (mime-parse-buffer)
     ))