From dbe998d1d9e0bb2c424dc2c9f79fb09eda4154aa Mon Sep 17 00:00:00 2001 From: hmurata Date: Wed, 23 Feb 2005 04:43:00 +0000 Subject: [PATCH] (elmo-filter-add-flag-count): Removed unused argument `number'. (elmo-filter-connect-signals): Follow the above change. --- elmo/ChangeLog | 6 ++++++ elmo/elmo-filter.el | 6 +++--- 2 files changed, 9 insertions(+), 3 deletions(-) diff --git a/elmo/ChangeLog b/elmo/ChangeLog index 6afa5ed..f257dea 100644 --- a/elmo/ChangeLog +++ b/elmo/ChangeLog @@ -1,3 +1,9 @@ +2005-02-23 Hiroya Murata + + * elmo-filter.el (elmo-filter-add-flag-count): Removed unused + argument `number'. + (elmo-filter-connect-signals): Follow the above change. + 2005-02-19 Yuuichi Teranishi * modb-standard.el (elmo-msgdb-unset-flag): Bind inhibit-quit. diff --git a/elmo/elmo-filter.el b/elmo/elmo-filter.el index 632b095..fda3160 100644 --- a/elmo/elmo-filter.el +++ b/elmo/elmo-filter.el @@ -66,8 +66,8 @@ (elmo-connect-signal target 'flag-changing folder (elmo-define-signal-handler (folder target number old-flags new-flags) - (elmo-filter-add-flag-count folder number old-flags -1) - (elmo-filter-add-flag-count folder number new-flags) + (elmo-filter-add-flag-count folder old-flags -1) + (elmo-filter-add-flag-count folder new-flags) (elmo-emit-signal 'flag-changing folder number old-flags new-flags)) (elmo-define-signal-filter (folder target number) (memq number (elmo-folder-list-messages folder nil t)))) @@ -113,7 +113,7 @@ (setq flag-count (cons (cons flag delta) flag-count))))) (elmo-filter-folder-set-flag-count-internal folder flag-count))) -(defun elmo-filter-add-flag-count (folder number flags &optional delta) +(defun elmo-filter-add-flag-count (folder flags &optional delta) (let ((flag-count (elmo-filter-folder-flag-count-internal folder)) (delta (or delta 1)) elem) -- 1.7.10.4