From 94bfc499a760424c43e2ebb45eea30381bd1c152 Mon Sep 17 00:00:00 2001 From: hmurata Date: Tue, 24 Jan 2006 00:03:24 +0000 Subject: [PATCH] (elmo-folder-delete-messages): Define. --- elmo/ChangeLog | 4 ++++ elmo/elmo-search.el | 5 +++++ 2 files changed, 9 insertions(+) diff --git a/elmo/ChangeLog b/elmo/ChangeLog index 51e161c..8359dd9 100644 --- a/elmo/ChangeLog +++ b/elmo/ChangeLog @@ -1,3 +1,7 @@ +2006-01-24 Hiroya Murata + + * elmo-search.el (elmo-folder-delete-messages): Define. + 2006-01-22 Hiroya Murata * elmo-vars.el (elmo-mailing-list-name-spec-list): Fixed diff --git a/elmo/elmo-search.el b/elmo/elmo-search.el index 9b138cc..b350dc0 100644 --- a/elmo/elmo-search.el +++ b/elmo/elmo-search.el @@ -211,6 +211,11 @@ Returns non-nil if fetching was succeed.") (concat "^" (regexp-quote (elmo-folder-prefix-internal folder)))))) +(luna-define-method elmo-folder-delete-messages ((folder elmo-search-folder) + numbers) + (elmo-folder-kill-messages folder numbers) + t) + ;;; Search engine -- 1.7.10.4