(normal-top-level): Call abbreviate-file-name again after calling command-line.

This commit is contained in:
Richard M. Stallman 1993-07-20 05:46:10 +00:00
parent 73ba415ae2
commit 00aa7e1cdf

View file

@ -143,6 +143,8 @@ directory name of the directory where the `.emacs' file was looked for.")
(setq default-directory (abbreviate-file-name default-directory))
(unwind-protect
(command-line)
;; Do this again, in case .emacs defined more abbreviations.
(setq default-directory (abbreviate-file-name default-directory))
(run-hooks 'emacs-startup-hook)
(and term-setup-hook
(run-hooks 'term-setup-hook))