From 8e60f40611264338bcedf2ab9398b4c815d71d55 Mon Sep 17 00:00:00 2001 From: tomo Date: Sun, 29 Apr 2012 05:13:52 +0000 Subject: [PATCH] (emh-request-partial-message): Don't use `raw-text-insert-file-contents'. --- emh.el | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/emh.el b/emh.el index 243e555..05a9678 100644 --- a/emh.el +++ b/emh.el @@ -290,11 +290,12 @@ digest are inserted into the folder after that message." (defun emh-request-partial-message () (let ((msg-filename (mh-msg-filename (mh-get-msg-num t))) - (show-buffer mh-show-buffer)) + (show-buffer mh-show-buffer) + (coding-system-for-read 'raw-text)) (set-buffer (get-buffer-create " *Partial Article*")) (erase-buffer) (setq mime-preview-buffer show-buffer) - (raw-text-insert-file-contents msg-filename) + (insert-file-contents msg-filename) (mime-parse-buffer) )) -- 1.7.10.4