From f803441ec57dd78353765ed76a126af9bbb4a92f Mon Sep 17 00:00:00 2001 From: teranisi Date: Mon, 24 Jan 2005 10:51:55 +0000 Subject: [PATCH] (elmo-mime-entity-display): Bind elmo-message-displaying as t. --- elmo/ChangeLog | 5 +++++ elmo/elmo-mime.el | 12 ++++++------ 2 files changed, 11 insertions(+), 6 deletions(-) diff --git a/elmo/ChangeLog b/elmo/ChangeLog index 97d298f..16cf280 100644 --- a/elmo/ChangeLog +++ b/elmo/ChangeLog @@ -1,3 +1,8 @@ +2005-01-24 Yuuichi Teranishi + + * elmo-mime.el (elmo-mime-entity-display): Bind elmo-message-displaying + as t. + 2005-01-23 Hiroya Murata * elmo-shimbun.el (toplevel): Require cl at compile. diff --git a/elmo/elmo-mime.el b/elmo/elmo-mime.el index 232e3e9..9bc4b23 100644 --- a/elmo/elmo-mime.el +++ b/elmo/elmo-mime.el @@ -72,12 +72,12 @@ use for keymap of representation buffer.") &optional original-major-mode keymap) - (mime-display-message entity - preview-buffer - nil - keymap - original-major-mode)) - + (let ((elmo-message-displaying t)) + (mime-display-message entity + preview-buffer + nil + keymap + original-major-mode))) (eval-and-compile (luna-define-class mime-elmo-buffer-entity (mime-buffer-entity -- 1.7.10.4