Function: gnus-async-prefetch-headers

gnus-async-prefetch-headers is a byte-compiled function defined in gnus-async.el.gz.

Signature

(gnus-async-prefetch-headers GROUP)

Documentation

Prefetch the headers for group GROUP.

Source Code

;; Defined in /usr/src/emacs/lisp/gnus/gnus-async.el.gz
;;;
;;; Header prefetch
;;;

(defun gnus-async-prefetch-headers (group)
  "Prefetch the headers for group GROUP."
  (save-excursion
    (let (unread)
      (when (and gnus-use-header-prefetch
		 gnus-asynchronous
		 (gnus-group-asynchronous-p group)
		 (listp gnus-async-header-prefetched)
		 (setq unread (gnus-list-of-unread-articles group)))
	;; Mark that a fetch is in progress.
	(setq gnus-async-header-prefetched t)
	(nnheader-set-temp-buffer gnus-async-prefetch-headers-buffer t)
	(erase-buffer)
	(let ((nntp-server-buffer (current-buffer))
	      (nnheader-callback-function
	       (lambda (_arg)
		  (setq gnus-async-header-prefetched
			(cons group unread)))))
	  (gnus-retrieve-headers unread group gnus-fetch-old-headers))))))