(mime-view-define-keymap): Change keybind for

[elisp/semi.git] / mime-play.el

diff --git a/mime-play.el b/mime-play.el
index e539a94..e3774de 100644 (file)
--- a/mime-play.el
+++ b/mime-play.el
@@ -43,6 +43,9 @@ If t, it means current directory."
   :type '(choice (const :tag "Current directory" t)
                 (directory)))
 
+(defvar mime-play-find-every-situations t
+  "*Find every available situations if non-nil.")
+
 
 ;;; @ content decoder
 ;;;
@@ -84,7 +87,8 @@ specified, play as it.  Default MODE is \"play\"."
         (mime-unify-situations (mime-entity-situation entity situation)
                                mime-acting-condition
                                mime-acting-situation-example-list
-                               ignored-method))
+                               'method ignored-method
+                               mime-play-find-every-situations))
        method)
     (setq mime-acting-situation-example-list (cdr ret)
          ret (car ret))