Function: gnus-cache-update-active

gnus-cache-update-active is a byte-compiled function defined in gnus-cache.el.gz.

Signature

(gnus-cache-update-active GROUP NUMBER &optional LOW)

Documentation

Update the upper bound of the active info of GROUP to NUMBER.

If LOW, update the lower bound instead.

Source Code

;; Defined in /usr/src/emacs/lisp/gnus/gnus-cache.el.gz
(defun gnus-cache-update-active (group number &optional low)
  "Update the upper bound of the active info of GROUP to NUMBER.
If LOW, update the lower bound instead."
  (let ((active (gethash group gnus-cache-active-hashtb)))
    (if (null active)
	;; We just create a new active entry for this group.
	(puthash group (cons number number) gnus-cache-active-hashtb)
      ;; Update the lower or upper bound.
      (if low
	  (setcar active number)
	(setcdr active number)))
    ;; Mark the active hashtb as altered.
    (setq gnus-cache-active-altered t)))