From b7e45860debf48b59bb4b4afba22c6baffe53b77 Mon Sep 17 00:00:00 2001 From: ShengHuo ZHU Date: Mon, 28 Jan 2002 14:30:19 +0000 Subject: [PATCH] Use nreverse, because it is sorted. --- lisp/ChangeLog | 3 ++- lisp/gnus-agent.el | 2 +- 2 files changed, 3 insertions(+), 2 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 582514f3c..2633884be 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,7 +1,8 @@ 2002-01-28 ShengHuo ZHU * 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 diff --git a/lisp/gnus-agent.el b/lisp/gnus-agent.el index 766e8a9a1..7d8afef33 100644 --- 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 -- 2.25.1