From 00aa7e1cdf96048081730e2fd597123a1e639be0 Mon Sep 17 00:00:00 2001
From: "Richard M. Stallman" <rms@gnu.org>
Date: Tue, 20 Jul 1993 05:46:10 +0000
Subject: [PATCH] (normal-top-level): Call abbreviate-file-name again after
 calling command-line.

---
 lisp/startup.el | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/lisp/startup.el b/lisp/startup.el
index 49a423f8a7a..d6d984fc839 100644
--- a/lisp/startup.el
+++ b/lisp/startup.el
@@ -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))
-- 
2.39.5