From: Simon Josefsson Date: Sun, 29 Jul 2001 16:27:32 +0000 (+0000) Subject: 2001-07-29 Simon Josefsson X-Git-Url: https://cgit.sxemacs.org/?a=commitdiff_plain;h=8fba437b5a736ce5cfbbea738721cc5cabbad015;p=gnus 2001-07-29 Simon Josefsson * mail-source.el (top-level): Require message for message-directory. (mail-source-directory): Change default to message-directory. --- diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 4017fda15..44a5673bb 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,8 @@ 2001-07-29 Simon Josefsson + * mail-source.el (top-level): Require message for message-directory. + (mail-source-directory): Change default to message-directory. + * smime.el (smime-keys, smime-CA-directory, smime-CA-file) (smime-certificate-directory, smime-openssl-program) (smime-encrypt-cipher, smime-dns-server): Fix doc (leading "*"). diff --git a/lisp/mail-source.el b/lisp/mail-source.el index 84ecbce81..badd3a173 100644 --- a/lisp/mail-source.el +++ b/lisp/mail-source.el @@ -36,6 +36,7 @@ (autoload 'nnheader-run-at-time "nnheader")) (require 'format-spec) (require 'mm-util) +(require 'message) ;; for `message-directory' (defgroup mail-source nil "The mail-fetching library." @@ -228,7 +229,7 @@ If non-nil, this maildrop will be checked periodically for new mail." :group 'mail-source :type 'file) -(defcustom mail-source-directory "~/Mail/" +(defcustom mail-source-directory message-directory "Directory where files (if any) will be stored." :group 'mail-source :type 'directory)