Function: gnus-cache-total-fetched-for

gnus-cache-total-fetched-for is an autoloaded and byte-compiled function defined in gnus-cache.el.gz.

Signature

(gnus-cache-total-fetched-for GROUP &optional NO-INHIBIT)

Documentation

Get total disk space used by the cache for the specified GROUP.

Source Code

;; Defined in /usr/src/emacs/lisp/gnus/gnus-cache.el.gz
(defun gnus-cache-total-fetched-for (group &optional no-inhibit)
  "Get total disk space used by the cache for the specified GROUP."
  (unless (equal group "dummy.group")
    (unless gnus-cache-total-fetched-hashtb
      (setq gnus-cache-total-fetched-hashtb (gnus-make-hashtable 1000)))
    (let* ((entry (gethash group gnus-cache-total-fetched-hashtb)))
      (if entry
	  (apply #'+ entry)
	(let ((gnus-cache-inhibit-update-total-fetched-for (not no-inhibit)))
	  (+
	   (gnus-cache-update-overview-total-fetched-for group nil)
	   (gnus-cache-update-file-total-fetched-for     group nil)))))))