`mime-view-code-converter-alist' -> `mime-text-decoder-alist'.

diff --git a/mime-text.el b/mime-text.el
index a60541e..2ca48fe 100644 (file)
--- a/mime-text.el
+++ b/mime-text.el
@@ -4,7 +4,7 @@
 
 ;; Author: MORIOKA Tomohiko <morioka@jaist.ac.jp>
 ;; Version:
-;;     $Id: mime-text.el,v 0.1 1997-02-21 04:16:04 tmorioka Exp $
+;;     $Id: mime-text.el,v 0.2 1997-02-21 04:17:40 tmorioka Exp $
 ;; Keywords: text, MIME, multimedia, mail, news
 
 ;; This file is part of tm (Tools for MIME).
@@ -29,7 +29,7 @@
 ;;; @ code conversion
 ;;;
 
-(defvar mime-view-code-converter-alist
+(defvar mime-text-decoder-alist
   '((mime/show-message-mode      . mime-charset/decode-buffer)
     (mime/temporary-message-mode . mime-charset/decode-buffer)
     (t                          . mime-charset/maybe-decode-buffer)
@@ -51,8 +51,8 @@
         (m (or (save-excursion
                  (set-buffer mime::preview/article-buffer)
                  mime::article/code-converter)
-               (cdr (or (assq mode mime-view-code-converter-alist)
-                        (assq t mime-view-code-converter-alist)))
+               (cdr (or (assq mode mime-text-decoder-alist)
+                        (assq t mime-text-decoder-alist)))
                ))
         )
     (and (functionp m)
@@ -84,7 +84,7 @@
 
 (defun mime-preview/filter-for-text/richtext (ctype params encoding)
   (let* ((mode mime::preview/original-major-mode)
-        (m (assq mode mime-view-code-converter-alist))
+        (m (assq mode mime-text-decoder-alist))
         (charset (cdr (assoc "charset" params)))
         (beg (point-min))
         )
@@ -95,7 +95,7 @@
 
 (defun mime-preview/filter-for-text/enriched (ctype params encoding)
   (let* ((mode mime::preview/original-major-mode)
-        (m (assq mode mime-view-code-converter-alist))
+        (m (assq mode mime-text-decoder-alist))
         (charset (cdr (assoc "charset" params)))
         (beg (point-min))
         )