(menu-bar-files-menu [recover-session]): Make sure auto save directory

exists before calling directory-files.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 0b8b70abc1d7e8cb771e40d5664d75c687b1e42d..73d6cbe24fb4adadfc97bd592708c49b24c2533f 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2000-07-23  Noah Friedman  <friedman@splode.com>
+
+       * menu-bar.el (menu-bar-files-menu [recover-session]): Make sure
+       auto save directory exists before calling directory-files.
+
 2000-07-23  Dave Love  <fx@gnu.org>
 
        * international/iso-transl.el (iso-transl-char-map): Fix ^e, ^i,
@@ -31,7 +36,7 @@
 
        * timer.el (run-with-idle-timer): Doc fix.
 
-       * mail/mail-utils.el (mail-strip-quoted-names): 
+       * mail/mail-utils.el (mail-strip-quoted-names):
        Handle case where <...> appears inside "...".
        Use replace-match to edit the string more simply.
        (rmail-dont-reply-to): Cope with an unmatched ".
@@ -59,8 +64,8 @@
        * gnus/parse-time.el: Correct author's mail address.
 
 2000-07-19  Colin Walters <walters@cis.ohio-state.edu>
-       
-       * comint.el (comint-highlight-input, comint-highlight-face): 
+
+       * comint.el (comint-highlight-input, comint-highlight-face):
        New user options.
        (comint-input-ring-file-name): Change custom type.
        (comint-mode-map): Bind mouse-2.
@@ -81,7 +86,7 @@
 
        * faces.el (face-font-selection-order)
        (face-font-family-alternatives): Add custom type.
-       
+
 2000-07-18  Dave Love  <fx@gnu.org>
 
        * cus-edit.el (custom-variable-reset-saved)
@@ -111,7 +116,7 @@
        * recentf.el: Update from author.
 
        * info.el (Info-title-face-alist): Removed.
-       
+
 2000-07-18  Eli Zaretskii  <eliz@is.elta.co.il>
 
        * eshell/eshell.el (eshell): Replace links to eshell.info with

diff --git a/lisp/menu-bar.el b/lisp/menu-bar.el
index b28b5ef4a37a4dbfed6a7beea830be7491efb038..9bde22e593c41d83a6be5fa46a56b632aa5f7987 100644 (file)
--- a/lisp/menu-bar.el
+++ b/lisp/menu-bar.el
@@ -124,7 +124,9 @@ A large number or nil slows down menu responsiveness."
 (define-key menu-bar-files-menu [recover-session]
   '(menu-item "Recover Crashed Session..." recover-session
              :enable (and auto-save-list-file-prefix
-                          (directory-files
+                          (file-directory-p
+                            (file-name-directory auto-save-list-file-prefix))
+                           (directory-files
                            (file-name-directory auto-save-list-file-prefix)
                            nil
                            (concat "\\`"