* elmo2.el (elmo-generic-folder-diff): Fix.

diff --git a/elmo/ChangeLog b/elmo/ChangeLog
index 30ec1cc..7bf1705 100644 (file)
--- a/elmo/ChangeLog
+++ b/elmo/ChangeLog
@@ -1,3 +1,7 @@
+2000-10-18  Kenichi OKADA  <okada@opaopa.org>
+
+       * elmo2.el (elmo-generic-folder-diff): Fix.
+
 2000-10-17  Kenichi OKADA  <okada@opaopa.org>
 
        * elmo-msgdb.el (elmo-msgdb-killed-list-length): New function.

diff --git a/elmo/elmo2.el b/elmo/elmo2.el
index 31a82ee..85d34a6 100644 (file)
--- a/elmo/elmo2.el
+++ b/elmo/elmo2.el
@@ -721,7 +721,7 @@ message list in msgdb. Otherwise, number-list is load from msgdb."
        (let ((number-list (or number-list
                               (mapcar 'car
                                       (elmo-msgdb-number-load
-                                       (elmo-msgdb-expand-path spec))))))
+                                       (elmo-msgdb-expand-path folder))))))
          ;; No info-cache.
          (setq in-db (sort number-list '<))
          (setq in-db-max (or (nth (max 0 (1- (length in-db))) in-db)