Commit b3c7c12c authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(normal-top-level): Set auto-save-list-file-name later,

after calling command-line.
parent 5e1515a8
......@@ -275,19 +275,19 @@ this prefix to create a unique file name.")
(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))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment