From 32ebf22fee071e63ce0c17f37582a96d9b2436cb Mon Sep 17 00:00:00 2001 From: murata Date: Sat, 20 May 2000 15:27:27 +0000 Subject: [PATCH] (elmo-localdir-pack-number): Use `elmo-msgdb-overview-get-entity' instead of `elmo-msgdb-overview-get-entity-by-number'. --- elmo/elmo-localdir.el | 6 ++---- 1 file changed, 2 insertions(+), 4 deletions(-) diff --git a/elmo/elmo-localdir.el b/elmo/elmo-localdir.el index 572eca6..32db3f8 100644 --- a/elmo/elmo-localdir.el +++ b/elmo/elmo-localdir.el @@ -397,8 +397,6 @@ (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 @@ -420,8 +418,8 @@ (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 -- 1.7.10.4