From: hmurata <hmurata>
Date: Thu, 10 May 2001 01:43:26 +0000 (+0000)
Subject: * elmo-localdir.el (elmo-folder-pack-numbers): Fixed.
X-Git-Tag: wl-2_6-root^3~8
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=d060df26a7a0758e16cdacd6587b6ec77ab3c381;p=elisp%2Fwanderlust.git

* elmo-localdir.el (elmo-folder-pack-numbers): Fixed.
---

diff --git a/elmo/ChangeLog b/elmo/ChangeLog
index d46b011..0c417c1 100644
--- a/elmo/ChangeLog
+++ b/elmo/ChangeLog
@@ -1,5 +1,9 @@
 2001-05-10  Hiroya Murata  <lapis-lazuli@pop06.odn.ne.jp>
 
+	* elmo-localdir.el (elmo-folder-pack-numbers): Fixed.
+
+2001-05-10  Hiroya Murata  <lapis-lazuli@pop06.odn.ne.jp>
+
 	* elmo.el (elmo-folder-move-messages): Fixed problem when
 	`dst-folder' is 'null.
 
diff --git a/elmo/elmo-localdir.el b/elmo/elmo-localdir.el
index 3d9358e..2c16914 100644
--- a/elmo/elmo-localdir.el
+++ b/elmo/elmo-localdir.el
@@ -343,7 +343,7 @@
   (let* ((dir (elmo-localdir-folder-directory-internal folder))
 	 (msgdb (elmo-folder-msgdb folder))
 	 (onum-alist (elmo-msgdb-get-number-alist msgdb))
-	 (omark-alist (elmo-msgdb-get-mark-alist (elmo-folder-msgdb msgdb)))
+	 (omark-alist (elmo-msgdb-get-mark-alist msgdb))
 	 (new-number 1)			; first ordinal position in localdir
 	 flist onum mark new-mark-alist total)
     (setq flist