X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=tm-ew-d.el;h=fb9ccf405a1f27df807e9fa7dbf290c4a55aa774;hb=cd47eed235f4258380f6d9b401c2fb1fc884931c;hp=32327701c150397e4c1d573b58d66b3752d2ef4e;hpb=f23312823073375ef7443064a48f3175063bb7b3;p=elisp%2Ftm.git

diff --git a/tm-ew-d.el b/tm-ew-d.el
index 3232770..fb9ccf4 100644
--- a/tm-ew-d.el
+++ b/tm-ew-d.el
@@ -10,7 +10,7 @@
 ;;;         MORIOKA Tomohiko <morioka@jaist.ac.jp>
 ;;; Maintainer: MORIOKA Tomohiko <morioka@jaist.ac.jp>
 ;;; Created: 1993/6/3 (1995/10/3 obsolete tiny-mime.el)
-;;; Version: $Revision: 7.10 $
+;;; Version: $Revision: 7.13 $
 ;;; Keywords: mail, news, MIME, RFC 1522, multilingual, encoded-word
 ;;;
 ;;; This file is part of tm (Tools for MIME).
@@ -41,7 +41,7 @@
 ;;;
 
 (defconst tm-ew-d/RCS-ID
-  "$Id: tm-ew-d.el,v 7.10 1996/04/19 08:24:15 morioka Exp $")
+  "$Id: tm-ew-d.el,v 7.13 1996/07/14 11:40:02 morioka Exp $")
 (defconst mime/eword-decoder-version (get-version-string tm-ew-d/RCS-ID))
 
 
@@ -177,14 +177,14 @@
 
 (defun mime/decode-encoded-text (charset encoding str)
   (let ((dest
-	 (cond ((string= "B" encoding)
+	 (cond ((string-equal "B" encoding)
 		(base64-decode-string str))
-	       ((string= "Q" encoding)
+	       ((string-equal "Q" encoding)
 		(q-encoding-decode-string str))
 	       (t (message "unknown encoding %s" encoding)
 		  nil))))
     (if dest
-	(mime/convert-string-to-emacs dest charset)
+	(decode-mime-charset-string dest charset)
       )))