mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-01 01:41:01 -08:00
Code Issues Projects Releases Wiki Activity

Revert "Allow gnus-retrieve-headers to return headers directly"

Browse source 
This reverts commit 20add1cd22. This
needs more work before it's ready to merge.
This commit is contained in:
Eric Abrahamsen 2021-01-26 08:47:07 -08:00
parent 3131a98911
commit 046db04e3d
8 changed files with 511 additions and 258 deletions
Download patch file Download diff file Expand all files Collapse all files

9
lisp/gnus/gnus-async.el
View file

@ -357,13 +357,8 @@ that was fetched."
(let ((nntp-server-buffer (current-buffer))
(nnheader-callback-function
(lambda (_arg)
(setq gnus-async-header-prefetched
(cons group unread)))))
;; FIXME: If header prefetch is ever put into use, we'll
;; have to handle the possibility that
;; `gnus-retrieve-headers' might return a list of header
;; vectors directly, rather than writing them into the
;; current buffer.
(setq gnus-async-header-prefetched
(cons group unread)))))
(gnus-retrieve-headers unread group gnus-fetch-old-headers))))))
(defun gnus-async-retrieve-fetched-headers (articles group)