Function: nnfolder-active-number

nnfolder-active-number is a byte-compiled function defined in nnfolder.el.gz.

Signature

(nnfolder-active-number GROUP)

Source Code

;; Defined in /usr/src/emacs/lisp/gnus/nnfolder.el.gz
(defun nnfolder-active-number (group)
  ;; Find the next article number in GROUP.
  (let ((active (cadr (assoc group nnfolder-group-alist))))
    (if active
	(setcdr active (1+ (cdr active)))
      ;; This group is new, so we create a new entry for it.
      ;; This might be a bit naughty... creating groups on the drop of
      ;; a hat, but I don't know...
      (push (list group (setq active (cons 1 1)))
	    nnfolder-group-alist))
    (cdr active)))