From e06e025aad149e990575a7e57ab4c05410dd135f Mon Sep 17 00:00:00 2001 From: yoichi Date: Sun, 14 Dec 2003 13:31:20 +0000 Subject: [PATCH] merge from semi-1_14 branch: * mime-play.el (mime-activate-mailcap-method): Don't use `binary-to-text-funcall'. (Thanks to TANAKA Shingo) --- ChangeLog | 5 +++++ mime-play.el | 9 ++++----- 2 files changed, 9 insertions(+), 5 deletions(-) diff --git a/ChangeLog b/ChangeLog index 984dcbf..c085143 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,8 @@ +2002-05-18 ARISAWA Akihiro + + * mime-play.el (mime-activate-mailcap-method): Don't use + `binary-to-text-funcall'. (Thanks to TANAKA Shingo) + 2003-12-14 Tatsuya Kinoshita * 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)))) -- 1.7.10.4