Function: gnus-group-category

gnus-group-category is a byte-compiled function defined in gnus-agent.el.gz.

Signature

(gnus-group-category GROUP)

Documentation

Return the category GROUP belongs to.

Source Code

;; Defined in /usr/src/emacs/lisp/gnus/gnus-agent.el.gz
(defun gnus-group-category (group)
  "Return the category GROUP belongs to."
  (unless gnus-category-group-cache
    (setq gnus-category-group-cache (gnus-make-hashtable 1000))
    (let ((cs gnus-category-alist)
	  groups)
      (dolist (cat cs)
	(setq groups (gnus-agent-cat-groups cat))
	(dolist (g groups)
	  (puthash g cat gnus-category-group-cache)))))
  (gethash group gnus-category-group-cache
	   (assq 'default gnus-category-alist)))