]> git.eshelyaron.com Git - emacs.git/commitdiff
(init_lread): Use Vinstallation_directory.
authorRichard M. Stallman <rms@gnu.org>
Mon, 17 Jan 1994 00:44:38 +0000 (00:44 +0000)
committerRichard M. Stallman <rms@gnu.org>
Mon, 17 Jan 1994 00:44:38 +0000 (00:44 +0000)
src/lread.c

index 6c2854a15b85cc33a2a2efb4c2b31bcff98babda..2ee7fbf12cca5a017b8b9e428afd1ff440a58c1a 100644 (file)
@@ -1849,15 +1849,14 @@ init_lread ()
       if (! NILP (Fequal (dump_path, Vload_path)))
        {
          Vload_path = decode_env_path (0, normal);
-         if (!NILP (Vinvocation_directory))
+         if (!NILP (Vinstallation_directory))
            {
-             /* Add to the path the ../lisp dir of the Emacs executable,
-                if that dir exists.  */
-             Lisp_Object tem, tem1;
-             tem = Fexpand_file_name (build_string ("../lisp"),
-                                      Vinvocation_directory);
-             tem1 = Ffile_exists_p (tem);
-             if (!NILP (tem1) && NILP (Fmember (tem, Vload_path)))
+             /* Add to the path the lisp subdir of the
+                installation dir.  */
+             Lisp_Object tem;
+             tem = Fexpand_file_name (build_string ("lisp"),
+                                      Vinstallation_directory);
+             if (NILP (Fmember (tem, Vload_path)))
                Vload_path = nconc2 (Vload_path, Fcons (tem, Qnil));
            }
        }