From: Richard M. Stallman <rms@gnu.org>
Date: Mon, 26 Jun 1995 04:39:42 +0000 (+0000)
Subject: (init_cmdargs): Make Vinvocation_directory
X-Git-Tag: emacs-19.34~3476
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=4133b3001a9d708596d9da3f52758080b6a5ca89;p=emacs.git

(init_cmdargs): Make Vinvocation_directory
absolute if it isn't already.
---

diff --git a/src/emacs.c b/src/emacs.c
index 2f17c312b3b..5a8af21463f 100644
--- a/src/emacs.c
+++ b/src/emacs.c
@@ -218,6 +218,11 @@ init_cmdargs (argc, argv, skip_args)
 	Vinvocation_directory = Ffile_name_directory (found);
     }
 
+  if (!NILP (Vinvocation_directory)
+      && NILP (Ffile_name_absolute_p (Vinvocation_directory)))
+    /* Emacs was started with relative path, like ./emacs  */
+    Vinvocation_directory = Fexpand_file_name (Vinvocation_directory, Qnil);
+
   Vinstallation_directory = Qnil;
 
   if (!NILP (Vinvocation_directory))