+2006-11-14 Reiner Steib <Reiner.Steib@gmx.de>
+
+ * gnus.el (gnus-start): Move custom group up.
+ (gnus-select-method): Don't autoload, but make it available for
+ `customize-variable'.
+ (gnus-getenv-nntpserver): Don't autoload.
+
2006-11-14 Teodor Zlatanov <tzz@lifelogs.com>
* spam.el: reverted to 7.82 (removed changes since 2006-10-16)
:group 'news
:group 'mail)
+(defgroup gnus-start nil
+ "Starting your favorite newsreader."
+ :group 'gnus)
+
(defgroup gnus-format nil
"Dealing with formatting issues."
:group 'gnus)
"Article Registry."
:group 'gnus)
-(defgroup gnus-start nil
- "Starting your favorite newsreader."
- :group 'gnus)
-
(defgroup gnus-start-server nil
"Server options at startup."
:group 'gnus-start)
:group 'gnus-server
:type 'file)
-;;;###autoload
(defun gnus-getenv-nntpserver ()
"Find default nntp server.
Check the NNTPSERVER environment variable and the
(when (re-search-forward "[^ \t\n\r]+" nil t)
(match-string 0))))))
-;;;###autoload
+;; `M-x customize-variable RET gnus-select-method RET' should work without
+;; starting or even loading Gnus.
+;;;###autoload(when (fboundp 'custom-autoload)
+;;;###autoload (custom-autoload 'gnus-select-method "gnus"))
+
(defcustom gnus-select-method
(condition-case nil
(nconc
There is a lot more to know about select methods and virtual servers -
see the manual for details."
:group 'gnus-server
+ :group 'gnus-start
+ :initialize 'custom-initialize-default
:type 'gnus-select-method)
(defcustom gnus-message-archive-method "archive"