Function: gnus-redefine-select-method-widget

gnus-redefine-select-method-widget is a byte-compiled function defined in gnus.el.gz.

Signature

(gnus-redefine-select-method-widget)

Documentation

Recomputes the select-method widget based on the value of gnus-valid-select-methods.

Source Code

;; Defined in /usr/src/emacs/lisp/gnus/gnus.el.gz
(defun gnus-redefine-select-method-widget ()
  "Recomputes the select-method widget based on the value of
`gnus-valid-select-methods'."
  (define-widget 'gnus-select-method 'list
    "Widget for entering a select method."
    :value '(nntp "")
    :tag "Select Method"
    :args `((choice :tag "Method"
		    ,@(mapcar (lambda (entry)
				(list 'const :format "%v\n"
				      (intern (car entry))))
			      gnus-valid-select-methods)
		    (symbol :tag "other"))
	    (string :tag "Address")
	    (repeat :tag "Options"
		    :inline t
                    (radio
		     (list :tag "Single var" :format "%v"
			   variable
			   (sexp :tag "Value"))
                     (list :tag "Multiple var" :format "%v"
			   variable
                           variable
			   (sexp :tag "Value")))))))