From: teranisi <teranisi>
Date: Sun, 13 Jul 2003 13:15:03 +0000 (+0000)
Subject: * elmo.el (elmo-folder-synchronize): Fixed bug when sync-all.
X-Git-Tag: elmo-mark-restart~58
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=551add8eb9a043c3dbdc1786c8afb86409ba5a00;p=elisp%2Fwanderlust.git

* elmo.el (elmo-folder-synchronize): Fixed bug when sync-all.
---

diff --git a/elmo/ChangeLog b/elmo/ChangeLog
index 0c83093..dffb966 100644
--- a/elmo/ChangeLog
+++ b/elmo/ChangeLog
@@ -1,3 +1,7 @@
+2003-07-13  Yuuichi Teranishi  <teranisi@gohome.org>
+
+	* elmo.el (elmo-folder-synchronize): Fixed bug when sync-all.
+
 2003-07-12  Yuuichi Teranishi  <teranisi@gohome.org>
 
 	* elmo-multi.el (elmo-folder-process-crosspost): Follow the change in
diff --git a/elmo/elmo.el b/elmo/elmo.el
index b8b24a1..5bb15c7 100644
--- a/elmo/elmo.el
+++ b/elmo/elmo.el
@@ -1481,10 +1481,10 @@ If update process is interrupted, return nil.")
 	flag-table crossed after-append numbers)
     (setq old-msgdb (elmo-folder-msgdb folder))
     (setq flag-table (elmo-flag-table-load (elmo-folder-msgdb-path folder)))
-    (setq numbers (sort (elmo-folder-list-messages folder nil t) '<))
     (when ignore-msgdb
       (elmo-msgdb-flag-table (elmo-folder-msgdb folder) flag-table)
       (elmo-folder-clear folder (eq ignore-msgdb 'visible-only)))
+    (setq numbers (sort (elmo-folder-list-messages folder nil t) '<))
     (unless no-check (elmo-folder-check folder))
     (condition-case nil
 	(progn