From af292f7e6c29ef0e40d61569eda8afb08edf934a Mon Sep 17 00:00:00 2001 From: morioka Date: Mon, 6 Jul 1998 05:08:04 +0000 Subject: [PATCH] (mime-preview-play-current-entity): Fix problem when `mode' is omitted with non-interactive mode (maybe for button dispatcher). --- mime-play.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/mime-play.el b/mime-play.el index b163641..221920f 100644 --- a/mime-play.el +++ b/mime-play.el @@ -73,14 +73,14 @@ It decodes current entity to call internal or external method. The method is selected from variable `mime-acting-condition'. If MODE is specified, play as it. Default MODE is \"play\"." - (interactive (list "play")) + (interactive) (let ((entity (get-text-property (point) 'mime-view-entity))) (if entity (let ((the-buf (current-buffer)) (raw-buffer (mime-entity-buffer entity))) (setq mime-preview-after-decoded-position (point)) (set-buffer raw-buffer) - (mime-raw-play-entity entity mode) + (mime-raw-play-entity entity (or mode "play")) (when (eq (current-buffer) raw-buffer) (set-buffer the-buf) (goto-char mime-preview-after-decoded-position) -- 1.7.10.4