* elmo-nmz.el (elmo-nmz-args): Changed default argumnet to --late from --early.

(elmo-map-folder-list-message-locations): Reverse location list.

diff --git a/elmo/ChangeLog b/elmo/ChangeLog
index c894b86..b0321a7 100644 (file)
--- a/elmo/ChangeLog
+++ b/elmo/ChangeLog
@@ -1,3 +1,9 @@
+2002-02-12  Yuuichi Teranishi  <teranisi@gohome.org>
+
+       * elmo-nmz.el (elmo-nmz-args): Changed default argumnet to --late
+       from --early.
+       (elmo-map-folder-list-message-locations): Reverse location list.
+
 2002-02-01  Kenichi OKADA  <okada@opaopa.org>
 
        * elmo-nntp.el (elmo-nntp-list-folders-get-cache): Fix.

diff --git a/elmo/elmo-nmz.el b/elmo/elmo-nmz.el
index 8bfd7bc..269e2a8 100644 (file)
--- a/elmo/elmo-nmz.el
+++ b/elmo/elmo-nmz.el
@@ -48,7 +48,7 @@ If the value is a list, all elements are used as index paths for namazu."
   :type 'symbol
   :group 'elmo)
 
-(defcustom elmo-nmz-args '("--all" "--list" "--early")
+(defcustom elmo-nmz-args '("--all" "--list" "--late")
   "*Argument list for namazu to list matched files."
   :type '(repeat string)
   :group 'elmo)
@@ -249,7 +249,7 @@ If the value is a list, all elements are used as index paths for namazu."
        (end-of-line)
        (setq locations (cons (buffer-substring bol (point)) locations))
        (forward-line 1))
-      locations)))
+      (nreverse locations))))
 
 (luna-define-method elmo-folder-exists-p ((folder elmo-nmz-folder))
   t)