(elmo-localdir-pack-number): Use `elmo-msgdb-overview-get-entity'
authormurata <murata>
Sat, 20 May 2000 15:27:27 +0000 (15:27 +0000)
committermurata <murata>
Sat, 20 May 2000 15:27:27 +0000 (15:27 +0000)
instead of `elmo-msgdb-overview-get-entity-by-number'.

elmo/elmo-localdir.el

index 572eca6..32db3f8 100644 (file)
   (let ((dir (elmo-localdir-get-folder-directory spec))
        (onum-alist (elmo-msgdb-get-number-alist msgdb))
        (omark-alist (elmo-msgdb-get-mark-alist msgdb))
-       (oov (elmo-msgdb-get-overview msgdb))
-       (oovht (elmo-msgdb-get-overviewht msgdb))
        i flist onum mark new-mark-alist total)
     (setq i 0)
     (setq flist
         (rename-file (int-to-string onum) (int-to-string i) t))
         ;; update overview
         (elmo-msgdb-overview-entity-set-number
-        (elmo-msgdb-overview-get-entity-by-number
-         oov onum oovht) i)
+        (elmo-msgdb-overview-get-entity onum msgdb)
+        i)
        ;; update number-alist
        (setcar (assq onum onum-alist) i))
       ;; update mark-alist