Function: gnus-agent-queue-setup

gnus-agent-queue-setup is a byte-compiled function defined in gnus-agent.el.gz.

Signature

(gnus-agent-queue-setup &optional GROUP-NAME)

Documentation

Make sure the queue group exists.

Optional arg GROUP-NAME allows another group to be specified.

Source Code

;; Defined in /usr/src/emacs/lisp/gnus/gnus-agent.el.gz
(defun gnus-agent-queue-setup (&optional group-name)
  "Make sure the queue group exists.
Optional arg GROUP-NAME allows another group to be specified."
  (unless (gethash (format "nndraft:%s" (or group-name "queue"))
		   gnus-newsrc-hashtb)
    (gnus-request-create-group (or group-name "queue") '(nndraft ""))
    (let ((gnus-level-default-subscribed 1))
      (gnus-subscribe-group (format "nndraft:%s" (or group-name "queue"))
			    nil '(nndraft "")))
    (gnus-group-set-parameter
     (format "nndraft:%s" (or group-name "queue"))
     'gnus-dummy '((gnus-draft-mode)))))