tm 7.56.

[elisp/tm.git] / gnus / tm-sgnus.el

diff --git a/gnus/tm-sgnus.el b/gnus/tm-sgnus.el
index 73cddf5..6b9f47d 100644 (file)
--- a/gnus/tm-sgnus.el
+++ b/gnus/tm-sgnus.el
@@ -7,7 +7,7 @@
 ;;; Author: MORIOKA Tomohiko <morioka@jaist.ac.jp>
 ;;; Maintainer: MORIOKA Tomohiko <morioka@jaist.ac.jp>
 ;;; Created: 1995/09/24
-;;; Version: $Revision: 7.53 $
+;;; Version: $Revision: 7.54 $
 ;;; Keywords: news, MIME, multimedia, multilingual, encoded-word
 ;;;
 ;;; This file is part of tm (Tools for MIME).
@@ -41,7 +41,7 @@
 ;;;
 
 (defconst tm-gnus/RCS-ID
-  "$Id: tm-sgnus.el,v 7.53 1996/04/25 12:07:08 morioka Exp $")
+  "$Id: tm-sgnus.el,v 7.54 1996/04/29 01:55:32 morioka Exp $")
 
 (defconst tm-gnus/version
   (concat (get-version-string tm-gnus/RCS-ID) " for September"))
@@ -201,11 +201,10 @@ This variable is set to `gnus-show-mime'.")
 (setq gnus-show-mime-method (function tm-gnus/preview-article))
 
 (defun tm-gnus/article-decode-encoded-word ()
-  (code-convert-region (point-min)(point-max)
-                      (save-excursion
-                        (set-buffer gnus-summary-buffer)
-                        mime/default-coding-system)
-                      *internal*)
+  (decode-coding-region (point-min)(point-max)
+                       (save-excursion
+                         (set-buffer gnus-summary-buffer)
+                         mime/default-coding-system))
   (mime/decode-message-header)
   (run-hooks 'tm-gnus/article-prepare-hook)
   )
@@ -338,11 +337,9 @@ This variable is set to `gnus-show-mime'.")
        (if (eq method 'nntp)
           (progn
             (setq from
-                  (code-convert-string
-                   from mime/default-coding-system *internal*))
+                  (decode-coding-string from mime/default-coding-system))
             (setq subj
-                  (code-convert-string
-                   subj mime/default-coding-system *internal*))
+                  (decode-coding-string subj mime/default-coding-system))
             ))
        (mail-header-set-from
        header (mime-eword/decode-string from))