From: morioka <morioka>
Date: Mon, 27 Apr 1998 22:20:14 +0000 (+0000)
Subject: (mime-raw-play-entity): Refer 'mime-view-find-every-acting-situation.
X-Git-Tag: semi-1_3_3~3
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=07b6b1776cfb893f40c4080392e2a0dd9ef64027;p=elisp%2Fsemi.git

(mime-raw-play-entity): Refer 'mime-view-find-every-acting-situation.
---

diff --git a/mime-play.el b/mime-play.el
index 127e144..4cce0e9 100644
--- a/mime-play.el
+++ b/mime-play.el
@@ -32,8 +32,6 @@
 
 (eval-when-compile (require 'mime-text))
 
-(defvar mime-user-acting-condition nil)
-
   
 ;;; @ content decoder
 ;;;
@@ -60,6 +58,8 @@ If MODE is specified, play as it.  Default MODE is \"play\"."
 	    (goto-char mime-preview-after-decoded-position)
 	    )))))
 
+(defvar mime-user-acting-condition nil)
+
 (defun mime-raw-play-entity (entity-info &optional mode)
   "Play entity specified by ENTITY-INFO.
 It decodes the entity to call internal or external method.  The method
@@ -95,8 +95,10 @@ specified, play as it.  Default MODE is \"play\"."
 	    (or (ctree-match-calist mime-user-acting-condition cal)
 		cal))
       (setq ret
-	    (or (ctree-find-calist mime-acting-condition ret 'all)
-		(ctree-find-calist mime-acting-condition cal 'all)
+	    (or (ctree-find-calist mime-acting-condition ret
+				   mime-view-find-every-acting-situation)
+		(ctree-find-calist mime-acting-condition cal
+				   mime-view-find-every-acting-situation)
 		))
       (cond ((cdr ret)
 	     (setq ret (select-menu-alist