From: tomo Date: Mon, 25 Dec 2000 09:05:50 +0000 (+0000) Subject: (mh-display-msg): Use `8bit-insert-encoded-file' instead of X-Git-Tag: emh-1_14_1~3 X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=d7b2c7c11555a0da7b239501c8be6f9b57d84976;p=elisp%2Femh.git (mh-display-msg): Use `8bit-insert-encoded-file' instead of `raw-text-insert-file-contents'. --- diff --git a/emh.el b/emh.el index efa3f27..394d660 100644 --- a/emh.el +++ b/emh.el @@ -98,21 +98,18 @@ nil, `emh-automatic-mime-preview' is used as default value." (progn (set-buffer abuf) (setq buffer-read-only nil) - (erase-buffer) - ) + (erase-buffer)) (setq abuf (get-buffer-create aname)) (set-buffer abuf) - (set-buffer-multibyte nil) - ) - (raw-text-insert-file-contents msg-filename) + (set-buffer-multibyte nil)) + (8bit-insert-encoded-file msg-filename) (set-buffer-modified-p nil) (setq buffer-read-only t) (setq buffer-file-name msg-filename) (mh-show-mode) (mime-display-message (mime-open-entity 'buffer aname) (concat "show-" folder)) - (goto-char (point-min)) - ) + (goto-char (point-min))) (let ((clean-message-header mh-clean-message-header) (invisible-headers mh-invisible-headers) (visible-headers mh-visible-headers))