X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=elmo%2Felmo-pop3.el;h=cb4ac69b1bbb47ffede3834e8c8b77045e01c990;hb=33896013b52a24d03ad840ad066e6978c2f6d26b;hp=294f2adf888976f8e6f802dc7961e0f2f1a9f011;hpb=ad9f1d40b0ca98a6e97d2ab68fd30c12b4a7e280;p=elisp%2Fwanderlust.git

diff --git a/elmo/elmo-pop3.el b/elmo/elmo-pop3.el
index 294f2ad..cb4ac69 100644
--- a/elmo/elmo-pop3.el
+++ b/elmo/elmo-pop3.el
@@ -532,10 +532,11 @@
 	  (setq loc-alist (if msgdb (elmo-msgdb-get-location msgdb)
 			    (elmo-msgdb-location-load
 			     (elmo-msgdb-expand-path spec)))))
-      (elmo-pop3-msgdb-create-by-header process numlist
-					new-mark already-mark
-					seen-mark seen-list
-					loc-alist))))
+      (elmo-msgdb-sort-by-date
+       (elmo-pop3-msgdb-create-by-header process numlist
+					 new-mark already-mark
+					 seen-mark seen-list
+					 loc-alist)))))
 
 (defun elmo-pop3-uidl-to-number (uidl)
   (string-to-number (elmo-get-hash-val uidl