* Small speedup PATCH to gnus-summary-insert-new-articles
@ 2002-07-19 13:39 Jason Merrill
2002-07-20 14:30 ` Kai Großjohann
0 siblings, 1 reply; 2+ messages in thread
From: Jason Merrill @ 2002-07-19 13:39 UTC (permalink / raw)
Cc: Jason Merrill
[-- Attachment #1: Type: text/plain, Size: 359 bytes --]
In an earlier patch (2001-04-12) I added the nreverse below so that the
articles would be listed in the right order. Shortly after sending that
patch, I realized that we might as well just build up the list in the right
order.
2001-11-04 Jason Merrill <jason@redhat.com>
* gnus-sum.el (gnus-summary-insert-new-articles): Count down to
avoid nreverse.
[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #2: Type: text/x-patch, Size: 1008 bytes --]
*** gnus-sum.el.~1~ Fri Jul 19 13:07:23 2002
--- gnus-sum.el Fri Jul 19 13:05:41 2002
*************** If ALL is a number, fetch this number of
*** 11092,11104 ****
i new)
(setq gnus-newsgroup-active
(gnus-activate-group gnus-newsgroup-name 'scan))
! (setq i (1+ (cdr old-active)))
! (while (<= i (cdr gnus-newsgroup-active))
(push i new)
! (incf i))
(if (not new)
(message "No gnus is bad news.")
- (setq new (nreverse new))
(gnus-summary-insert-articles new)
(setq gnus-newsgroup-unreads
(gnus-sorted-nunion gnus-newsgroup-unreads new))
--- 11092,11103 ----
i new)
(setq gnus-newsgroup-active
(gnus-activate-group gnus-newsgroup-name 'scan))
! (setq i (cdr gnus-newsgroup-active))
! (while (> i (cdr old-active))
(push i new)
! (decf i))
(if (not new)
(message "No gnus is bad news.")
(gnus-summary-insert-articles new)
(setq gnus-newsgroup-unreads
(gnus-sorted-nunion gnus-newsgroup-unreads new))
^ permalink raw reply [flat|nested] 2+ messages in thread
end of thread, other threads:[~2002-07-20 14:30 UTC | newest]
Thread overview: 2+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2002-07-19 13:39 Small speedup PATCH to gnus-summary-insert-new-articles Jason Merrill
2002-07-20 14:30 ` Kai Großjohann
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for NNTP newsgroup(s).