From ca10334b0fe70aed690a0d91cb0a3d973fed4688 Mon Sep 17 00:00:00 2001 From: morioka Date: Tue, 16 Jun 1998 22:08:06 +0000 Subject: [PATCH] (mime-activate-mailcap-method): Fixed. --- mime-play.el | 9 +++++++-- 1 file changed, 7 insertions(+), 2 deletions(-) diff --git a/mime-play.el b/mime-play.el index 45ff40d..28ab231 100644 --- a/mime-play.el +++ b/mime-play.el @@ -206,8 +206,13 @@ specified, play as it. Default MODE is \"play\"." (narrow-to-region start end) (goto-char start) (let ((method (cdr (assoc 'method situation))) - (name (expand-file-name (mime-raw-get-filename situation) - mime-temp-directory))) + (name (mime-raw-get-filename situation))) + (setq name + (if name + (expand-file-name name mime-temp-directory) + (make-temp-name + (expand-file-name "EMI" mime-temp-directory)) + )) (mime-write-decoded-region (mime-entity-body-start entity) end name (cdr (assq 'encoding situation))) (message "External method is starting...") -- 1.7.10.4