(Fgetenv_internal): Renamed from Fgetenv.

diff --git a/src/callproc.c b/src/callproc.c
index 85a5eaf72d9b753d37efe3160b40cda182f54945..20a260daa093b9be0cd069ca459a64c78a59e117 100644 (file)
--- a/src/callproc.c
+++ b/src/callproc.c
@@ -1272,7 +1272,7 @@ getenv_internal (var, varlen, value, valuelen)
   return 0;
 }
 
-DEFUN ("getenv", Fgetenv, Sgetenv, 1, 1, 0,
+DEFUN ("getenv-internal", Fgetenv_internal, Sgetenv_internal, 1, 1, 0,
   "Return the value of environment variable VAR, as a string.\n\
 VAR should be a string.  Value is nil if VAR is undefined in the environment.\n\
 This function consults the variable ``process-environment'' for its value.")
@@ -1486,7 +1486,7 @@ when Emacs starts.");
 
 #ifndef VMS
   defsubr (&Scall_process);
-  defsubr (&Sgetenv);
+  defsubr (&Sgetenv_internal);
 #endif
   defsubr (&Scall_process_region);
 }