comparison lisp/gnus/mail-source.el @ 89983:0796fc36c2bd

Revision: miles@gnu.org--gnu-2004/emacs--unicode--0--patch-43 Merge from emacs--cvs-trunk--0 Patches applied: * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-553 - miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-557 Update from CVS * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-558 Merge from gnus--rel--5.10 * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-559 - miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-561 Update from CVS * miles@gnu.org--gnu-2004/gnus--rel--5.10--patch-30 Update from CVS
author Miles Bader <miles@gnu.org>
date Tue, 21 Sep 2004 09:34:12 +0000
parents cce1c0ee76ee 497f0d2ca551
children f3ec05478165
comparison
equal deleted inserted replaced
89982:56440e073a4d 89983:0796fc36c2bd
233 (boolean :tag "Plugged"))))))) 233 (boolean :tag "Plugged")))))))
234 234
235 (defcustom mail-source-ignore-errors nil 235 (defcustom mail-source-ignore-errors nil
236 "*Ignore errors when querying mail sources. 236 "*Ignore errors when querying mail sources.
237 If nil, the user will be prompted when an error occurs. If non-nil, 237 If nil, the user will be prompted when an error occurs. If non-nil,
238 the error will be ignored.") 238 the error will be ignored."
239 :version "21.4"
240 :group 'mail-source
241 :type 'boolean)
239 242
240 (defcustom mail-source-primary-source nil 243 (defcustom mail-source-primary-source nil
241 "*Primary source for incoming mail. 244 "*Primary source for incoming mail.
242 If non-nil, this maildrop will be checked periodically for new mail." 245 If non-nil, this maildrop will be checked periodically for new mail."
243 :group 'mail-source 246 :group 'mail-source
279 282
280 (defcustom mail-source-delete-old-incoming-confirm t 283 (defcustom mail-source-delete-old-incoming-confirm t
281 "*If non-nil, ask for for confirmation before deleting old incoming files. 284 "*If non-nil, ask for for confirmation before deleting old incoming files.
282 This variable only applies when `mail-source-delete-incoming' is a positive 285 This variable only applies when `mail-source-delete-incoming' is a positive
283 number." 286 number."
287 :version "21.4"
284 :group 'mail-source 288 :group 'mail-source
285 :type 'boolean) 289 :type 'boolean)
286 290
287 (defcustom mail-source-incoming-file-prefix "Incoming" 291 (defcustom mail-source-incoming-file-prefix "Incoming"
288 "Prefix for file name for storing incoming mail" 292 "Prefix for file name for storing incoming mail"
299 :group 'mail-source 303 :group 'mail-source
300 :type 'number) 304 :type 'number)
301 305
302 (defcustom mail-source-movemail-program nil 306 (defcustom mail-source-movemail-program nil
303 "If non-nil, name of program for fetching new mail." 307 "If non-nil, name of program for fetching new mail."
308 :version "21.4"
304 :group 'mail-source 309 :group 'mail-source
305 :type '(choice (const nil) string)) 310 :type '(choice (const nil) string))
306 311
307 ;;; Internal variables. 312 ;;; Internal variables.
308 313