From: Gerd Moellmann <gerd@gnu.org>
Date: Mon, 24 Apr 2000 18:43:25 +0000 (+0000)
Subject: (auto-save-list-file-prefix): Set default to
X-Git-Tag: emacs-pretest-21.0.90~4151
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=73f13e5a9d6b83e3986069cdca433469f5b79851;p=emacs.git

(auto-save-list-file-prefix): Set default to
`~/.emacs.d/auto-save-list/.saves-' for systems other than MS-DOS.
---

diff --git a/lisp/startup.el b/lisp/startup.el
index 0b378584aec..230988f2104 100644
--- a/lisp/startup.el
+++ b/lisp/startup.el
@@ -317,13 +317,16 @@ after your init file is read, in case it sets `mail-host-address'."
   :group 'mail)
 
 (defcustom auto-save-list-file-prefix
-  (if (eq system-type 'ms-dos)
-      "~/_s"  ; MS-DOS cannot have initial dot, and allows only 8.3 names
-    "~/.saves-")
+  (cond ((eq system-type 'ms-dos)
+	 ;; MS-DOS cannot have initial dot, and allows only 8.3 names
+	 "~/_s")
+	(t
+	 "~/.emacs.d/auto-save-list/.saves-"))
   "Prefix for generating `auto-save-list-file-name'.
 This is used after reading your `.emacs' file to initialize
 `auto-save-list-file-name', by appending Emacs's pid and the system name,
 if you have not already set `auto-save-list-file-name' yourself.
+Directories in the prefix will be created if necessary.
 Set this to nil if you want to prevent `auto-save-list-file-name'
 from being initialized."
   :type '(choice (const :tag "Don't record a session's auto save list" nil)