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

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

diff --git a/mime-play.el b/mime-play.el
index 5c14389..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
 ;;;
@@ -85,7 +88,7 @@ specified, play as it.  Default MODE is \"play\"."
                                mime-acting-condition
                                mime-acting-situation-example-list
                                'method ignored-method
-                               mime-view-find-every-situations))
+                               mime-play-find-every-situations))
        method)
     (setq mime-acting-situation-example-list (cdr ret)
          ret (car ret))