From 98e15937bea2f34f8020fec43a8ddb8197fef3db Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Thu, 24 May 2012 00:20:34 -0700 Subject: [PATCH] Add missing autload pieces needed for rmail-spool-directory's delayed init --- lisp/mail/rmail.el | 9 +++++++++ 1 file changed, 9 insertions(+) diff --git a/lisp/mail/rmail.el b/lisp/mail/rmail.el index ad364edeea1..cd2a961638e 100644 --- a/lisp/mail/rmail.el +++ b/lisp/mail/rmail.el @@ -148,6 +148,13 @@ its character representation and its display representation.") :group 'rmail :version "21.1") +;;;###autoload +(put 'rmail-spool-directory 'standard-value + '((cond ((file-exists-p "/var/mail") "/var/mail/") + ((file-exists-p "/var/spool/mail") "/var/spool/mail/") + ((memq system-type '(hpux usg-unix-v irix)) "/usr/mail/") + (t "/usr/spool/mail/")))) + ;;;###autoload (defcustom rmail-spool-directory (purecopy @@ -166,6 +173,8 @@ Its name should end with a slash." :type 'directory :group 'rmail) +;;;###autoload(custom-initialize-delay 'rmail-spool-directory nil) + (defcustom rmail-movemail-program nil "If non-nil, the file name of the `movemail' program." :group 'rmail-retrieve -- 2.39.2