`emh-decode-charset-buffer' -> `emh-text-decode-buffer'.

diff --git a/emh.el b/emh.el
index d231515..56d88de 100644 (file)
--- a/emh.el
+++ b/emh.el
@@ -8,7 +8,7 @@
 ;; Created: 1993/11/21
 ;;     Renamed: 1993/11/27 from mh-e-mime.el
 ;;     Renamed: 1997/02/21 from tm-mh-e.el
-;; Version: $Revision: 0.8 $
+;; Version: $Revision: 0.9 $
 ;; Keywords: MH, MIME, multimedia, encoded-word, multilingual, mail
 
 ;; This file is part of emh.
@@ -39,7 +39,7 @@
 ;;;
 
 (defconst emh-RCS-ID
-  "$Id: emh.el,v 0.8 1997-03-16 00:05:32 morioka Exp $")
+  "$Id: emh.el,v 0.9 1997-03-16 00:06:57 morioka Exp $")
 
 (defconst emh-version (get-version-string emh-RCS-ID))
 
@@ -223,12 +223,12 @@ digest are inserted into the folder after that message."
 ;;; @ for mime-view
 ;;;
 
-(fset 'emh-decode-charset-buffer
+(fset 'emh-text-decode-buffer
       (symbol-function 'mime-text-decode-buffer))
 
 (set-alist 'mime-text-decoder-alist
           'mh-show-mode
-          (function emh-decode-charset-buffer))
+          (function emh-text-decode-buffer))
 
 (defvar emh-content-header-filter-hook
   (if window-system
@@ -241,7 +241,7 @@ digest are inserted into the folder after that message."
 (defun emh-content-header-filter ()
   (goto-char (point-min))
   (mime-preview/cut-header)
-  (emh-decode-charset-buffer default-mime-charset)
+  (emh-text-decode-buffer default-mime-charset)
   (eword-decode-header)
   (run-hooks 'emh-content-header-filter-hook)
   )