From: ari <ari>
Date: Sun, 14 Dec 2003 12:49:38 +0000 (+0000)
Subject: * mime-play.el (mime-activate-mailcap-method): Don't use
X-Git-Tag: semi-1_14_6~8
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=88207709503e466d0c157bc8122f84f88f9d6111;p=elisp%2Fsemi.git

* mime-play.el (mime-activate-mailcap-method): Don't use
`binary-to-text-funcall'. (Thanks to TANAKA Shingo)
---

diff --git a/ChangeLog b/ChangeLog
index 75f68b4..d543913 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2002-05-18  ARISAWA Akihiro  <ari@mbf.sphere.ne.jp>
+
+	* mime-play.el (mime-activate-mailcap-method): Don't use
+	`binary-to-text-funcall'. (Thanks to TANAKA Shingo)
+	
 2003-12-14  Tatsuya Kinoshita  <tats@vega.ocn.ne.jp>
 
 	* mime-edit.el (mime-charset-type-list): Add entry for iso-8859-1[45].
diff --git a/mime-play.el b/mime-play.el
index a96934e..846f8cc 100644
--- a/mime-play.el
+++ b/mime-play.el
@@ -151,10 +151,9 @@ specified, play as it.  Default MODE is \"play\"."
 	   (let ((command
 		  (mime-format-mailcap-command
 		   method
-		   (cons (cons 'filename name) situation))))
-	     (binary-to-text-funcall
-	      mime-play-messages-coding-system
-	      #'start-process command mime-echo-buffer-name
+		   (cons (cons 'filename name) situation)))
+                 (coding-system-for-read mime-play-messages-coding-system))
+	     (start-process command mime-echo-buffer-name
 	      shell-file-name shell-command-switch command))))
       (set-alist 'mime-mailcap-method-filename-alist process name)
       (set-process-sentinel process 'mime-mailcap-method-sentinel))))