From 83be5c8c3e4a2ae7c010db8c6a151ba01458a0aa Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Sat, 13 Sep 1997 06:25:46 +0000 Subject: [PATCH] (gnus-default-subscribed-newsgroups): Fix custom type. Doc fix. (gnus-init-file): Doc fix. (gnus-site-init-file): Fix customize type. --- lisp/gnus/gnus-start.el | 26 ++++++++++++-------------- 1 file changed, 12 insertions(+), 14 deletions(-) diff --git a/lisp/gnus/gnus-start.el b/lisp/gnus/gnus-start.el index 0520c2f59e..95413550e5 100644 --- a/lisp/gnus/gnus-start.el +++ b/lisp/gnus/gnus-start.el @@ -41,31 +41,29 @@ :type 'file) (defcustom gnus-init-file (nnheader-concat gnus-home-directory ".gnus") - "Your Gnus elisp startup file. -If a file with the .el or .elc suffixes exist, it will be read -instead." + "Your Gnus Emacs-Lisp startup file name. +If a file with the `.el' or `.elc' suffixes exists, it will be read instead." :group 'gnus-start :type 'file) (defcustom gnus-site-init-file (condition-case nil - (concat (file-name-directory - (directory-file-name installation-directory)) - "site-lisp/gnus-init") + (concat (file-name-directory + (directory-file-name installation-directory)) + "site-lisp/gnus-init") (error nil)) - "The site-wide Gnus elisp startup file. -If a file with the .el or .elc suffixes exist, it will be read -instead." + "The site-wide Gnus Emacs-Lisp startup file name, or nil if none. +If a file with the `.el' or `.elc' suffixes exists, it will be read instead." :group 'gnus-start - :type 'file) + :type '(choice file (const nil))) (defcustom gnus-default-subscribed-newsgroups nil - "This variable lists what newsgroups should be subscribed the first time Gnus is used. -It should be a list of strings. -If it is `t', Gnus will not do anything special the first time it is + "List of newsgroups to subscribe, when a user runs Gnus the first time. +The value should be a list of strings. +If it is t, Gnus will not do anything special the first time it is started; it'll just use the normal newsgroups subscription methods." :group 'gnus-start - :type '(repeat string)) + :type '(choice (repeat string) (const :tag "Nothing special" t))) (defcustom gnus-use-dribble-file t "*Non-nil means that Gnus will use a dribble file to store user updates. -- 2.20.1