Function: gnus-group-default-level

gnus-group-default-level is a byte-compiled function defined in gnus-group.el.gz.

Signature

(gnus-group-default-level &optional LEVEL NUMBER-OR-NIL)

Source Code

;; Defined in /usr/src/emacs/lisp/gnus/gnus-group.el.gz
;; Look at LEVEL and find out what the level is really supposed to be.
;; If LEVEL is non-nil, LEVEL will be returned, if not, what happens
;; will depend on whether `gnus-group-use-permanent-levels' is used.
(defun gnus-group-default-level (&optional level number-or-nil)
  (cond
   (gnus-group-use-permanent-levels
    (or level
        (if (numberp gnus-group-use-permanent-levels)
	    gnus-group-use-permanent-levels
	  (or (gnus-group-default-list-level)
	      gnus-level-subscribed))
	(gnus-group-default-list-level) gnus-level-subscribed))
   (number-or-nil
    level)
   (t
    (or level (gnus-group-default-list-level) gnus-level-subscribed))))