* elmo-msgdb.el (elmo-msgdb-make-index): Use

elmo-msgdb-overview-entity-get-number instead of
elmo-message-entity-number.

diff --git a/elmo/ChangeLog b/elmo/ChangeLog
index 7e32db1..4845bd0 100644 (file)
--- a/elmo/ChangeLog
+++ b/elmo/ChangeLog
@@ -1,3 +1,9 @@
+2003-08-12  Yuuichi Teranishi  <teranisi@gohome.org>
+
+       * elmo-msgdb.el (elmo-msgdb-make-index): Use
+       elmo-msgdb-overview-entity-get-number instead of
+       elmo-message-entity-number.
+
 2003-08-09  Hiroya Murata  <lapis-lazuli@pop06.odn.ne.jp>
 
        * elmo-version.el (elmo-version): Up to 2.11.7.

diff --git a/elmo/elmo-msgdb.el b/elmo/elmo-msgdb.el
index 60fce6b..6e7efb5 100644 (file)
--- a/elmo/elmo-msgdb.el
+++ b/elmo/elmo-msgdb.el
@@ -1314,14 +1314,15 @@ Return a list of message numbers which have duplicated message-ids."
        ;; key is message-id
        (if (elmo-get-hash-val (caar overview) ehash) ; duplicated.
            (setq duplicates (cons
-                             (elmo-message-entity-number (car overview))
+                             (elmo-msgdb-overview-entity-get-number
+                              (car overview))
                              duplicates)))
        (if (caar overview)
            (elmo-set-hash-val (caar overview) (car overview) ehash))
        ;; key is number
        (elmo-set-hash-val
         (format "#%d"
-                (elmo-message-entity-number (car overview)))
+                (elmo-msgdb-overview-entity-get-number (car overview)))
         (car overview) ehash)
        (setq overview (cdr overview)))
       (while mark-alist