Variable: gnus-summary-tool-bar-gnome

gnus-summary-tool-bar-gnome is a customizable variable defined in gnus-sum.el.gz.

Value

((gnus-summary-post-news "mail/compose" nil)
 (gnus-summary-insert-new-articles "mail/inbox" nil :visible
				   (or
				    (not gnus-agent)
				    gnus-plugged))
 (gnus-summary-reply-with-original "mail/reply")
 (gnus-summary-reply "mail/reply" nil :visible nil)
 (gnus-summary-followup-with-original "mail/reply-all")
 (gnus-summary-followup "mail/reply-all" nil :visible nil)
 (gnus-summary-mail-forward "mail/forward")
 (gnus-summary-save-article "mail/save")
 (gnus-summary-search-article-forward "search" nil :visible nil)
 (gnus-summary-print-article "print")
 (gnus-summary-tick-article-forward "flag-followup" nil :visible nil)
 (gnus-summary-save-newsrc "save" nil :visible nil)
 (gnus-summary-prev-article "left-arrow")
 (gnus-summary-next-article "right-arrow")
 (gnus-summary-next-page "next-page")
 (gnus-summary-mark-as-expirable "delete" nil :visible
				 (gnus-check-backend-function 'request-expire-articles gnus-newsgroup-name))
 (gnus-summary-mark-as-spam "mail/spam" t :visible
			    (and
			     (fboundp 'spam-group-ham-contents-p)
			     (spam-group-ham-contents-p gnus-newsgroup-name))
			    :help "Mark as spam")
 (gnus-summary-mark-as-read-forward "mail/not-spam" nil :visible
				    (and
				     (fboundp 'spam-group-spam-contents-p)
				     (spam-group-spam-contents-p gnus-newsgroup-name)))
 (gnus-summary-exit "exit")
 (gmm-customize-mode "preferences" t :help "Edit mode preferences")
 (gnus-info-find-node "help"))

Documentation

List of functions for the summary tool bar (GNOME style).

See gmm-tool-bar-from-list for the format of the list.

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

Source Code

;; Defined in /usr/src/emacs/lisp/gnus/gnus-sum.el.gz
(defcustom gnus-summary-tool-bar-gnome
  '((gnus-summary-post-news "mail/compose" nil)
    (gnus-summary-insert-new-articles "mail/inbox" nil
				      :visible (or (not gnus-agent)
						   gnus-plugged))
    (gnus-summary-reply-with-original "mail/reply")
    (gnus-summary-reply "mail/reply" nil :visible nil)
    (gnus-summary-followup-with-original "mail/reply-all")
    (gnus-summary-followup "mail/reply-all" nil :visible nil)
    (gnus-summary-mail-forward "mail/forward")
    (gnus-summary-save-article "mail/save")
    (gnus-summary-search-article-forward "search" nil :visible nil)
    (gnus-summary-print-article "print")
    (gnus-summary-tick-article-forward "flag-followup" nil :visible nil)
    ;; Some new commands that may need more suitable icons:
    (gnus-summary-save-newsrc "save" nil :visible nil)
    ;; (gnus-summary-show-article "stock_message-display" nil :visible nil)
    (gnus-summary-prev-article "left-arrow")
    (gnus-summary-next-article "right-arrow")
    (gnus-summary-next-page "next-page")
    ;; (gnus-summary-enter-digest-group "right_arrow" nil :visible nil)
    ;;
    ;; Maybe some sort-by-... could be added:
    ;; (gnus-summary-sort-by-author "sort-a-z" nil :visible nil)
    ;; (gnus-summary-sort-by-date "sort-1-9" nil :visible nil)
    (gnus-summary-mark-as-expirable
     "delete" nil
     :visible (gnus-check-backend-function 'request-expire-articles
					   gnus-newsgroup-name))
    (gnus-summary-mark-as-spam
     "mail/spam" t
     :visible (and (fboundp 'spam-group-ham-contents-p)
		   (spam-group-ham-contents-p gnus-newsgroup-name))
     :help "Mark as spam")
    (gnus-summary-mark-as-read-forward
     "mail/not-spam" nil
     :visible (and (fboundp 'spam-group-spam-contents-p)
		   (spam-group-spam-contents-p gnus-newsgroup-name)))
    ;;
    (gnus-summary-exit "exit")
    (gmm-customize-mode "preferences" t :help "Edit mode preferences")
    (gnus-info-find-node "help"))
  "List of functions for the summary tool bar (GNOME style).

See `gmm-tool-bar-from-list' for the format of the list."
  :type '(repeat gmm-tool-bar-item)
  :version "23.1" ;; No Gnus
  :initialize 'custom-initialize-default
  :set 'gnus-summary-tool-bar-update
  :group 'gnus-summary)