(elmo-filter-add-flag-count): Removed unused

argument `number'.
(elmo-filter-connect-signals): Follow the above change.

diff --git a/elmo/ChangeLog b/elmo/ChangeLog
index 6afa5ed..f257dea 100644 (file)
--- a/elmo/ChangeLog
+++ b/elmo/ChangeLog
@@ -1,3 +1,9 @@
+2005-02-23  Hiroya Murata  <lapis-lazuli@pop06.odn.ne.jp>
+
+       * 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  <teranisi@gohome.org>
 
        * 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 (file)
--- 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)