(mime-activate-mailcap-method): Regard 'mime-temp-directory.

diff --git a/mime-play.el b/mime-play.el
index 20991eb..41009ab 100644 (file)
--- a/mime-play.el
+++ b/mime-play.el
@@ -203,7 +203,8 @@ specified, play as it.  Default MODE is \"play\"."
       (narrow-to-region start end)
       (goto-char start)
       (let ((method (cdr (assoc 'method situation)))
-           (name (mime-raw-get-filename situation)))
+           (name (expand-file-name (mime-raw-get-filename situation)
+                                   mime-temp-directory)))
        (mime-write-decoded-region (if (re-search-forward "^$" end t)
                                       (1+ (match-end 0))
                                     (point-min))