From ed35820cac6679c9e1b94da35d18cc9e0dc55c29 Mon Sep 17 00:00:00 2001 From: hmurata Date: Tue, 16 Nov 2004 17:31:02 +0000 Subject: [PATCH] (elmo-event-handler-flag-changed): Use `set-buffer' instead of `with-current-buffer'. --- wl/ChangeLog | 5 +++++ wl/wl-summary.el | 12 ++++++------ 2 files changed, 11 insertions(+), 6 deletions(-) diff --git a/wl/ChangeLog b/wl/ChangeLog index 77e39f4..434f9cc 100644 --- a/wl/ChangeLog +++ b/wl/ChangeLog @@ -1,3 +1,8 @@ +2004-11-16 Hiroya Murata + + * wl-summary.el (elmo-event-handler-flag-changed): Use + `set-buffer' instead of `with-current-buffer'. + 2004-11-14 Hiroya Murata * wl-summary.el (wl-summary-after-resize-function): New function. diff --git a/wl/wl-summary.el b/wl/wl-summary.el index f22d6dc..167debf 100644 --- a/wl/wl-summary.el +++ b/wl/wl-summary.el @@ -656,12 +656,12 @@ See also variable `wl-use-petname'." (luna-define-method elmo-event-handler-flag-changed ((handler wl-summary-event-handler) numbers) - (with-current-buffer (wl-summary-event-handler-buffer-internal handler) - (save-excursion - (dolist (number numbers) - (when (and (wl-summary-message-visible-p number) - (wl-summary-jump-to-msg number)) - (wl-summary-update-persistent-mark number)))))) + (save-excursion + (set-buffer (wl-summary-event-handler-buffer-internal handler)) + (dolist (number numbers) + (when (and (wl-summary-message-visible-p number) + (wl-summary-jump-to-msg number)) + (wl-summary-update-persistent-mark number))))) (defun wl-summary-buffer-detach () (when (and (eq major-mode 'wl-summary-mode) -- 1.7.10.4