Function: gnus-group-set-subscription

gnus-group-set-subscription is a byte-compiled function defined in gnus-group.el.gz.

Signature

(gnus-group-set-subscription GROUP LEVEL &optional SILENT)

Documentation

Set subscription of GROUP to LEVEL.

Killed newsgroups are subscribed. If SILENT, don't try to update the group line.

Source Code

;; Defined in /usr/src/emacs/lisp/gnus/gnus-group.el.gz
(defun gnus-group-set-subscription (group level &optional silent)
  "Set subscription of GROUP to LEVEL.
Killed newsgroups are subscribed.  If SILENT, don't try to update the
group line."
  (let ((newsrc (gnus-group-entry group)))
    (cond
     ((string-match "\\`[ \t]*\\'" group)
      (error "Empty group name"))
     (newsrc
      (gnus-group-change-level newsrc level)
      (unless silent
	(gnus-group-update-group group)))
     ((and (stringp group)
	   (or (not (gnus-read-active-file-p))
	       (gnus-active group)))
      (gnus-group-change-level
       group
       level
       (or (and (member group gnus-zombie-list)
		gnus-level-zombie)
	   gnus-level-killed)
       (gnus-group-group-name))
      (unless silent
	(gnus-group-update-group group)))
     (t (error "No such newsgroup: %s" group)))
    (gnus-group-position-point)))