Variable: gnus-group-tool-bar

gnus-group-tool-bar is a customizable variable defined in gnus-group.el.gz.

Value

((gnus-group-post-news "mail/compose")
 (gnus-agent-toggle-plugged "unplugged" t :help "Gnus is currently unplugged.  Click to work online." :visible
			    (and gnus-agent
				 (not gnus-plugged)))
 (gnus-agent-toggle-plugged "plugged" t :help "Gnus is currently plugged.  Click to work offline." :visible
			    (and gnus-agent gnus-plugged))
 (gnus-group-send-queue "mail/outbox" t :visible
			(and gnus-agent gnus-plugged)
			:help "Send articles from the queue group")
 (gnus-group-get-new-news "mail/inbox" nil :visible
			  (or
			   (not gnus-agent)
			   gnus-plugged))
 (gnus-topic-read-group "open" nil :visible
			(and
			 (boundp 'gnus-topic-mode)
			 gnus-topic-mode))
 (gnus-group-read-group "open" nil :visible
			(not
			 (and
			  (boundp 'gnus-topic-mode)
			  gnus-topic-mode)))
 (gnus-group-save-newsrc "save")
 (gnus-group-describe-group "describe")
 (gnus-group-toggle-subscription-at-point "gnus/toggle-subscription")
 (gnus-group-prev-unread-group "left-arrow")
 (gnus-group-next-unread-group "right-arrow")
 (gnus-group-exit "exit")
 (gmm-customize-mode "preferences" t :help "Edit mode preferences")
 (gnus-info-find-node "help"))

Documentation

Specifies the Gnus group tool bar.

It can be either a list or a symbol referring to a list. See gmm-tool-bar-from-list for the format of the list. The default key map is gnus-group-mode-map.

This variable was added, or its default value changed, in Emacs 29.1.

Source Code

;; Defined in /usr/src/emacs/lisp/gnus/gnus-group.el.gz
(defcustom gnus-group-tool-bar
  '((gnus-group-post-news "mail/compose")
    ;; Some useful agent icons?  I don't use the agent so agent users should
    ;; suggest useful commands:
    (gnus-agent-toggle-plugged
     "unplugged" t
     :help "Gnus is currently unplugged.  Click to work online."
     :visible (and gnus-agent (not gnus-plugged)))
    (gnus-agent-toggle-plugged
     "plugged" t
     :help "Gnus is currently plugged.  Click to work offline."
     :visible (and gnus-agent gnus-plugged))
    (gnus-group-send-queue
     "mail/outbox" t
     :visible (and gnus-agent gnus-plugged)
     :help "Send articles from the queue group")
    (gnus-group-get-new-news
     "mail/inbox" nil
     :visible (or (not gnus-agent)
		  gnus-plugged))
    (gnus-topic-read-group
     "open" nil
     :visible (and (boundp 'gnus-topic-mode)
		   gnus-topic-mode))
    (gnus-group-read-group
     "open" nil
     :visible (not (and (boundp 'gnus-topic-mode)
			gnus-topic-mode)))
    (gnus-group-save-newsrc "save")
    (gnus-group-describe-group "describe")
    (gnus-group-toggle-subscription-at-point "gnus/toggle-subscription")
    (gnus-group-prev-unread-group "left-arrow")
    (gnus-group-next-unread-group "right-arrow")
    (gnus-group-exit "exit")
    (gmm-customize-mode "preferences" t :help "Edit mode preferences")
    (gnus-info-find-node "help"))
  "Specifies the Gnus group tool bar.

It can be either a list or a symbol referring to a list.  See
`gmm-tool-bar-from-list' for the format of the list.  The
default key map is `gnus-group-mode-map'."
  :type '(choice (repeat :tag "User defined list" gmm-tool-bar-item)
		 (symbol))
  :version "29.1"
  :group 'gnus-group)