(command-line-1): Don't signal an error if the

directory for auto-save-list files does not yet exist.

2 files changed, 10 insertions, 0 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 83e692ec238..189f91aa895 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2000-05-17  Eli Zaretskii  <eliz@is.elta.co.il>
+
+        * startup.el (command-line-1): Don't signal an error if the
+        directory for auto-save-list files does not yet exist.
+
 2000-05-17  Kenichi Handa  <handa@etl.go.jp>
 
         * international/mule-conf.el (arabic-iso8859-6): Fix typo.
diff --git a/lisp/startup.el b/lisp/startup.el
index 75559d1d955..510a529581e 100644
--- a/lisp/startup.el
+++ b/lisp/startup.el
@@ -939,6 +939,11 @@ Mode-specific menu   C-mouse-3 (third button, with CTRL)"))
 \(`C-' means use the CTRL key.  `M-' means use the Meta (or Alt) key.
 If you have no Meta key, you may instead type ESC followed by the character.)")
                          (and auto-save-list-file-prefix
+                              ;; Don't signal an error if the
+                              ;; directory for auto-save-list files
+                              ;; does not yet exist.
+                              (file-directory-p (file-name-directory
+                                                 auto-save-list-file-prefix))
                               (directory-files
                                (file-name-directory auto-save-list-file-prefix)
                                nil