From: teranisi <teranisi>
Date: Thu, 11 May 2000 00:16:45 +0000 (+0000)
Subject: (elmo-msgdb-sort-by-date): Fixed a problem of refiling failure on Maildir.
X-Git-Tag: wl-2_4-root~172
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=de53d224fda675413a19f27a3911551a8d3a1ead;p=elisp%2Fwanderlust.git

(elmo-msgdb-sort-by-date): Fixed a problem of refiling failure on Maildir.
---

diff --git a/elmo/elmo-msgdb.el b/elmo/elmo-msgdb.el
index 595a435..0d9e46c 100644
--- a/elmo/elmo-msgdb.el
+++ b/elmo/elmo-msgdb.el
@@ -4,7 +4,7 @@
 
 ;; Author: Yuuichi Teranishi <teranisi@gohome.org>
 ;; Keywords: mail, net news
-;; Time-stamp: <00/03/06 13:24:13 teranisi>
+;; Time-stamp: <00/05/10 23:09:52 teranisi>
 
 ;; This file is part of ELMO (Elisp Library for Message Orchestration).
 
@@ -682,7 +682,7 @@ Header region is supposed to be narrowed."
   (let ((overview (elmo-msgdb-get-overview msgdb)))
     (setq overview (elmo-msgdb-overview-sort-by-date overview))
     (message "Sorting...done.")
-    (list overview (nth 1 msgdb)(nth 2 msgdb))))
+    (list overview (nth 1 msgdb)(nth 2 msgdb)(nth 3 msgdb))))
 
 (defsubst elmo-msgdb-search-overview-entity (number number-alist overview)
   (let ((message-id (cdr (assq number number-alist)))