From: yoichi <yoichi>
Date: Sun, 14 Dec 2003 13:31:20 +0000 (+0000)
Subject: merge from semi-1_14 branch:
X-Git-Tag: emiko-1_14-epg-branchpoint~32
X-Git-Url: http://git.chise.org/gitweb/?p=elisp%2Fsemi.git;a=commitdiff_plain;h=e06e025aad149e990575a7e57ab4c05410dd135f

merge from semi-1_14 branch:
* 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 984dcbf..c085143 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 543d702..8223ab3 100644
--- a/mime-play.el
+++ b/mime-play.el
@@ -145,11 +145,10 @@ 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
-	      shell-file-name shell-command-switch command))))
+		   (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))))