From 6c36001856f867c11b8f29ea3a37bfa037f5a68f Mon Sep 17 00:00:00 2001 From: hmurata Date: Sun, 26 Oct 2003 12:30:22 +0000 Subject: [PATCH] * wl-spam.el (wl-summary-exec-action-spam): Fixed. --- wl/ChangeLog | 2 ++ wl/wl-spam.el | 8 ++++---- 2 files changed, 6 insertions(+), 4 deletions(-) diff --git a/wl/ChangeLog b/wl/ChangeLog index fec4663..bd14dc0 100644 --- a/wl/ChangeLog +++ b/wl/ChangeLog @@ -1,5 +1,7 @@ 2003-10-26 Hiroya Murata + * wl-spam.el (wl-summary-exec-action-spam): Fixed. + * wl-vars.el (wl-summary-mark-action-list): Fixed type spec. * wl-spam.el (toplevel): Require wl-highlight. diff --git a/wl/wl-spam.el b/wl/wl-spam.el index 66922b2..7e2224c 100644 --- a/wl/wl-spam.el +++ b/wl/wl-spam.el @@ -267,10 +267,10 @@ See `wl-summary-mark-action-list' for the detail of element." (elmo-spam-register-spam-messages (elmo-spam-processor) folder (mapcar #'car mark-list))) - (message "Registering spam...done") - (wl-summary-move-mark-list-messages mark-list - wl-spam-folder-name - "Refiling spam...")))) + (message "Registering spam...done")) + (wl-summary-move-mark-list-messages mark-list + wl-spam-folder-name + "Refiling spam..."))) (defun wl-summary-exec-action-refile-with-register (mark-list) (let ((processor (elmo-spam-processor)) -- 1.7.10.4