From 27c9c7ef7c9582fa3bd4f7f850a738233c98c75e Mon Sep 17 00:00:00 2001 From: hmurata Date: Wed, 23 Jul 2003 05:33:46 +0000 Subject: [PATCH] * elmo-pipe.el (elmo-folder-unmark-answered): Define. (elmo-folder-mark-as-answered): Ditto. --- elmo/ChangeLog | 5 +++++ elmo/elmo-pipe.el | 10 ++++++++++ 2 files changed, 15 insertions(+) diff --git a/elmo/ChangeLog b/elmo/ChangeLog index dc83a66..49ece13 100644 --- a/elmo/ChangeLog +++ b/elmo/ChangeLog @@ -1,3 +1,8 @@ +2003-07-23 Hiroya Murata + + * elmo-pipe.el (elmo-folder-unmark-answered): Define. + (elmo-folder-mark-as-answered): Ditto. + 2003-07-22 Yuuichi Teranishi * elmo-pop3.el (elmo-pop3-exists-exactly): Set default value as nil. diff --git a/elmo/elmo-pipe.el b/elmo/elmo-pipe.el index 4c22abe..8c3aa2e 100644 --- a/elmo/elmo-pipe.el +++ b/elmo/elmo-pipe.el @@ -285,6 +285,16 @@ (elmo-folder-mark-as-important (elmo-pipe-folder-dst-internal folder) numbers ignore-flag)) +(luna-define-method elmo-folder-unmark-answered ((folder elmo-pipe-folder) + numbers) + (elmo-folder-unmark-answered (elmo-pipe-folder-dst-internal folder) + numbers)) + +(luna-define-method elmo-folder-mark-as-answered ((folder elmo-pipe-folder) + numbers) + (elmo-folder-mark-as-answered (elmo-pipe-folder-dst-internal folder) + numbers)) + (luna-define-method elmo-folder-pack-numbers ((folder elmo-pipe-folder)) (elmo-folder-pack-numbers (elmo-pipe-folder-dst-internal folder))) -- 1.7.10.4