Function: gnus-cache-update-overview-total-fetched-for

gnus-cache-update-overview-total-fetched-for is a byte-compiled function defined in gnus-cache.el.gz.

Signature

(gnus-cache-update-overview-total-fetched-for GROUP FILE)

Source Code

;; Defined in /usr/src/emacs/lisp/gnus/gnus-cache.el.gz
(defun gnus-cache-update-overview-total-fetched-for (group file)
  (when gnus-cache-total-fetched-hashtb
    (gnus-cache-with-refreshed-group
     group
     (let* ((entry (or (gethash group gnus-cache-total-fetched-hashtb)
		       (puthash group (make-list 2 0)
				     gnus-cache-total-fetched-hashtb)))
	    (file-name-coding-system nnmail-pathname-coding-system)
	    (size (or (file-attribute-size (file-attributes
			      (or file
				  (gnus-cache-file-name group ".overview"))))
		      0)))
       (setq gnus-cache-need-update-total-fetched-for t)
       (setf (nth 0 entry) size)))))