diff src/emacs.c @ 7003:176bb79caecf

(init_cmdargs): Check only for etc and lib-src subdirs when setting Vinstallation_directory. (syms_of_emacs): Make Lisp vars invocation-name, invocation-directory and installation-directory.

--- a/src/emacs.c	Thu Apr 21 08:43:33 1994 +0000
+++ b/src/emacs.c	Thu Apr 21 09:04:25 1994 +0000
@@ -1024,10 +1024,18 @@
 it to change priority.  (Emacs sets its uid back to the real uid.)");
   emacs_priority = 0;
 
-  staticpro (&Vinstallation_directory);
-  Vinstallation_directory = Qnil;
+  DEFVAR_LISP ("invocation-name", &Vinvocation_name,
+    "The program name that was used to run Emacs.\n\
+Any directory names are omitted.");
+
+  DEFVAR_LISP ("invocation-directory", &Vinvocation_directory,
+    "The directory in which the Emacs executable was found, to run it.\n\
+The value is nil if that directory's name is not known.");
 
-  /* These have already been set, in init_cmdargs, so don't set them here.  */
-  staticpro (&Vinvocation_name);
-  staticpro (&Vinvocation_directory);
+  DEFVAR_LISP ("installation-directory", &Vinstallation_directory,
+    "A directory within which to look for the `lib-src' and `etc' directories.\n\
+This is non-nil when we can't find those directories in their standard\n\
+installed locations, but we can find them\n\
+near where the Emacs executable was found.");
+  Vinstallation_directory = Qnil;
 }