`mime-preview/decode-text-buffer' -> `mime-decode-text-body'.

diff --git a/mime-text.el b/mime-text.el
index b6d6e53..e18416b 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.18 1997-03-16 00:01:21 morioka Exp $
+;;     $Id: mime-text.el,v 0.19 1997-03-16 01:56:00 morioka Exp $
 ;; Keywords: text, MIME, multimedia, mail, news
 
 ;; This file is part of SEMI (SEMI is Emacs MIME Interfaces).
@@ -60,7 +60,7 @@ raw-buffer.")
       (mime-text-decode-buffer charset)
       ))
 
-(defun mime-preview/decode-text-buffer (charset encoding)
+(defun mime-decode-text-body (charset encoding)
   (mime-decode-region (point-min) (point-max) encoding)
   (let ((text-decoder
         (save-excursion
@@ -98,7 +98,7 @@ raw-buffer.")
 ;;;
 
 (defun mime-preview/filter-for-text/plain (ctype params encoding)
-  (mime-preview/decode-text-buffer (cdr (assoc "charset" params)) encoding)
+  (mime-decode-text-body (cdr (assoc "charset" params)) encoding)
   (goto-char (point-max))
   (if (not (eq (char-after (1- (point))) ?\n))
       (insert "\n")
@@ -121,7 +121,7 @@ raw-buffer.")
         (beg (point-min))
         )
     (remove-text-properties beg (point-max) '(face nil))
-    (mime-preview/decode-text-buffer charset encoding)
+    (mime-decode-text-body charset encoding)
     (richtext-decode beg (point-max))
     ))
 
@@ -130,7 +130,7 @@ raw-buffer.")
         (beg (point-min))
         )
     (remove-text-properties beg (point-max) '(face nil))
-    (mime-preview/decode-text-buffer charset encoding)
+    (mime-decode-text-body charset encoding)
     (enriched-decode beg (point-max))
     ))