Use nreverse, because it is sorted.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 582514f..2633884 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,7 +1,8 @@
 2002-01-28  ShengHuo ZHU  <zsh@cs.rochester.edu>
 
        * gnus-agent.el (gnus-agent-retrieve-headers): Use
-       nnheader-find-nov-line to speed up.
+       nnheader-find-nov-line to speed up. Use nreverse, because it is
+       sorted.
 
 2002-01-28  Katsumi Yamaoka  <yamaoka@jpl.org>
 

diff --git a/lisp/gnus-agent.el b/lisp/gnus-agent.el
index 766e8a9..7d8afef 100644 (file)
--- a/lisp/gnus-agent.el
+++ b/lisp/gnus-agent.el
@@ -1846,7 +1846,7 @@ The following commands are available:
            (when (looking-at "[0-9]")
              (push (read (current-buffer)) cached-articles))
            (forward-line 1))
-         (setq cached-articles (sort cached-articles '<))))
+         (setq cached-articles (nreverse cached-articles))))
       (if (setq uncached-articles 
                (gnus-set-difference articles cached-articles))
          (progn