From: morioka Date: Sat, 14 Mar 1998 23:17:31 +0000 (+0000) Subject: Add setting for `mime-raw-buffer-coding-system-alist'. X-Git-Tag: emh-1_1_1~10 X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=764ffa0568b7d8b39b71c95048732e477aa95d2f;p=elisp%2Femh.git Add setting for `mime-raw-buffer-coding-system-alist'. --- diff --git a/emh.el b/emh.el index 1b5a511..8479f5d 100644 --- a/emh.el +++ b/emh.el @@ -39,7 +39,7 @@ ;;; (defconst emh-RCS-ID - "$Id: emh.el,v 1.6 1998-03-13 19:01:20 morioka Exp $") + "$Id: emh.el,v 1.7 1998-03-14 23:17:31 morioka Exp $") (defconst emh-version (get-version-string emh-RCS-ID)) @@ -231,12 +231,14 @@ digest are inserted into the folder after that message." ;;; @ for mime-view ;;; +(set-alist 'mime-raw-buffer-coding-system-alist + 'mh-show-mode 'no-conversion) + (fset 'emh-text-decode-buffer (symbol-function 'mime-text-decode-buffer)) (set-alist 'mime-text-decoder-alist - 'mh-show-mode - (function emh-text-decode-buffer)) + 'mh-show-mode #'emh-text-decode-buffer) (defvar emh-content-header-filter-hook (if window-system