From: Glenn Morris <rgm@gnu.org>
Date: Thu, 24 May 2012 07:20:34 +0000 (-0700)
Subject: Add missing autload pieces needed for rmail-spool-directory's delayed init
X-Git-Tag: emacs-24.2.90~471^2~6^2~110^2~13
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=98e15937bea2f34f8020fec43a8ddb8197fef3db;p=emacs.git

Add missing autload pieces needed for rmail-spool-directory's delayed init
---

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