From c45d5d8d1f9a9413ea2ffd5cd8e5613dbca4450d Mon Sep 17 00:00:00 2001 From: hmurata Date: Sat, 2 Aug 2003 15:35:50 +0000 Subject: [PATCH] * wl-action.el (wl-summary-target-mark-all): Use elmo-folder-list-messages. --- wl/ChangeLog | 5 +++++ wl/wl-action.el | 4 ++-- 2 files changed, 7 insertions(+), 2 deletions(-) diff --git a/wl/ChangeLog b/wl/ChangeLog index c104ea8..ba6c632 100644 --- a/wl/ChangeLog +++ b/wl/ChangeLog @@ -1,3 +1,8 @@ +2003-08-02 Hiroya Murata + + * wl-action.el (wl-summary-target-mark-all): Use + elmo-folder-list-messages. + 2003-08-02 Yuuichi Teranishi * wl-summary.el (wl-summary-rescan): Added argument disable-kill diff --git a/wl/wl-action.el b/wl/wl-action.el index f1dedd9..54af747 100644 --- a/wl/wl-action.el +++ b/wl/wl-action.el @@ -895,8 +895,8 @@ If optional argument NUMBER is specified, unmark message specified by NUMBER." (interactive) (wl-summary-target-mark-region (point-min) (point-max)) (setq wl-summary-buffer-target-mark-list - (mapcar 'car - (elmo-msgdb-get-number-alist (wl-summary-buffer-msgdb))))) + (elmo-folder-list-messages wl-summary-buffer-elmo-folder + nil 'in-msgdb))) (defun wl-summary-delete-all-mark (mark) (goto-char (point-min)) -- 1.7.10.4