# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 814467587 0
# Node ID 68cd0fc88a566c7ffe737a155b91a64ae927c306
# Parent  9493a12ca8a5c7783818b4159ce50d8282972ee2
(normal-top-level): Set auto-save-list-file-name later,
after calling command-line.

diff -r 9493a12ca8a5 -r 68cd0fc88a56 lisp/startup.el
--- a/lisp/startup.el	Mon Oct 23 16:57:42 1995 +0000
+++ b/lisp/startup.el	Mon Oct 23 16:59:47 1995 +0000
@@ -275,19 +275,19 @@
 			   (delete (concat "PWD=" pwd)
 				   process-environment)))))))
     (setq default-directory (abbreviate-file-name default-directory))
-    ;; Specify the file for recording all the auto save files of this session.
-    ;; This is used by recover-session.
-    (setq auto-save-list-file-name
-	  (expand-file-name
-	   (format "%s%d-%s"
-		   auto-save-list-file-prefix
-		   (emacs-pid)
-		   (system-name))))
     (let ((menubar-bindings-done nil))
       (unwind-protect
 	  (command-line)
 	;; Do this again, in case .emacs defined more abbreviations.
 	(setq default-directory (abbreviate-file-name default-directory))
+	;; Specify the file for recording all the auto save files of this session.
+	;; This is used by recover-session.
+	(setq auto-save-list-file-name
+	      (expand-file-name
+	       (format "%s%d-%s"
+		       auto-save-list-file-prefix
+		       (emacs-pid)
+		       (system-name))))
 	(run-hooks 'emacs-startup-hook)
 	(and term-setup-hook
 	     (run-hooks 'term-setup-hook))