From: tomo <tomo>
Date: Thu, 19 Aug 1999 05:18:30 +0000 (+0000)
Subject: (mime-viewer/default-content-header-filter): Use
X-Git-Tag: tm-8_1~16
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=262ed4c88c17db444118fc83b3428f4ccb0c7b79;p=elisp%2Ftm.git

(mime-viewer/default-content-header-filter): Use
`mime-decode-header-in-buffer' instead of
`mime/decode-message-header'.
(mime-preview/display-content): Use `eword-decode-string' instead of
`mime-eword/decode-string'.
(mime-viewer/follow-content): Use `mime/decode-message-header' instead
of `mime/decode-message-header'.
---

diff --git a/tm-view.el b/tm-view.el
index 25aa9fc..e667f4d 100644
--- a/tm-view.el
+++ b/tm-view.el
@@ -32,7 +32,7 @@
 (require 'tl-misc)
 (require 'std11)
 (require 'mel)
-(require 'tm-ew-d)
+(require 'eword-decode)
 (require 'tm-def)
 (require 'tm-parse)
 (require 'tm-text)
@@ -314,7 +314,7 @@ Each elements are regexp of field-name. [tm-view.el]")
 
 (defun mime-viewer/default-content-header-filter ()
   (mime-preview/cut-header)
-  (mime/decode-message-header)
+  (mime-decode-header-in-buffer)
   )
 
 (defvar mime-viewer/content-header-filter-alist nil)
@@ -503,7 +503,7 @@ The compressed face will be piped to this command.")
     (save-restriction
       (narrow-to-region beg end)
       (setq subj
-	    (mime-eword/decode-string
+	    (eword-decode-string
 	     (mime-article/get-subject params encoding)))
       )
     (set-buffer obuf)
@@ -1007,7 +1007,7 @@ button-2	Move to point under the mouse cursor
 		      ))
 		(setq rest (cdr rest))
 		))
-	    (mime/decode-message-header)
+	    (mime-decode-header-in-buffer)
 	    )
 	  (let ((f (cdr (assq mode mime-viewer/following-method-alist))))
 	    (if (functionp f)