From 7a06643e464fd50f41bad5b5993b718b2a8a806c Mon Sep 17 00:00:00 2001 From: teranisi Date: Mon, 28 Jul 2003 13:29:42 +0000 Subject: [PATCH] * wl-expire.el (wl-expire-refile-with-copy-reserve-msg): Follow the change in the order of the arguments for `wl-expire-message-p'. (Reported by Shinichiro HIDA ) --- wl/ChangeLog | 3 +++ wl/wl-expire.el | 2 +- 2 files changed, 4 insertions(+), 1 deletion(-) diff --git a/wl/ChangeLog b/wl/ChangeLog index 99cb690..6b33e47 100644 --- a/wl/ChangeLog +++ b/wl/ChangeLog @@ -2,6 +2,9 @@ * wl-expire.el (wl-summary-expire): Fixed 2nd argument for `wl-append'. (Reported by Shinichiro HIDA ) + (wl-expire-refile-with-copy-reserve-msg): Follow the change in the + order of the arguments for `wl-expire-message-p'. + (Reported by Shinichiro HIDA ) * wl-summary.el (wl-summary-target-mark-reply-with-citation): Check return value of wl-summary-reply. diff --git a/wl/wl-expire.el b/wl/wl-expire.el index f598b17..f122586 100644 --- a/wl/wl-expire.el +++ b/wl/wl-expire.el @@ -196,7 +196,7 @@ If REFILE-LIST includes reserve mark message, so copy." (error "%s: create folder failed" (elmo-folder-name-internal dst-folder))) (while (setq msg (wl-pop msglist)) - (unless (wl-expire-message-p msg folder) + (unless (wl-expire-message-p folder msg) (setq msg-id (elmo-message-field folder msg 'message-id)) (if (assoc msg-id wl-expired-alist) ;; reserve mark message already refiled or expired -- 1.7.10.4