mirror of
git://git.sv.gnu.org/emacs.git
synced 2026-02-16 17:24:23 +00:00
* callproc.c (delete_temp_file): Declare this to return
Lisp_Object, to smooth type-checking. * callproc.c (init_callproc): Move the initialization of Vprocess_environment to its own function. (set_process_environment): This is that. * emacs.c (main): Call set_process_environment earlier than init_callproc.
This commit is contained in:
parent
f054132a4d
commit
9fefd2bacb
1 changed files with 6 additions and 2 deletions
|
|
@ -334,7 +334,7 @@ If you quit, the process is killed with SIGINT, or SIGKILL if you quit again.")
|
|||
}
|
||||
#endif
|
||||
|
||||
static void
|
||||
static Lisp_Object
|
||||
delete_temp_file (name)
|
||||
Lisp_Object name;
|
||||
{
|
||||
|
|
@ -572,7 +572,6 @@ egetenv (var)
|
|||
init_callproc ()
|
||||
{
|
||||
register char * sh;
|
||||
register char **envp;
|
||||
Lisp_Object tempdir;
|
||||
|
||||
{
|
||||
|
|
@ -611,6 +610,11 @@ init_callproc ()
|
|||
sh = (char *) getenv ("SHELL");
|
||||
Vshell_file_name = build_string (sh ? sh : "/bin/sh");
|
||||
#endif
|
||||
}
|
||||
|
||||
set_process_environment ()
|
||||
{
|
||||
register char **envp;
|
||||
|
||||
Vprocess_environment = Qnil;
|
||||
#ifndef CANNOT_DUMP
|
||||
|
|
|
|||
Loading…
Reference in a new issue