Mercurial > emacs
diff src/process.c @ 109305:33b59bdb0ac4
Don't use `subprocesses' in msdos.c.
msdos.c (syms_of_msdos) <delete-exited-processes>: Remove DEFVAR.
(delete_exited_processes): Don't define.
process.c (syms_of_process) <delete-exited-processes>: Define
even if !subprocesses.
(delete_exited_processes): Ditto.
author | Eli Zaretskii <eliz@gnu.org> |
---|---|
date | Sun, 11 Jul 2010 08:55:06 +0300 |
parents | ff3561236472 |
children | 108c259501da |
line wrap: on
line diff
--- a/src/process.c Sat Jul 10 15:47:59 2010 -0400 +++ b/src/process.c Sun Jul 11 08:55:06 2010 +0300 @@ -310,6 +310,9 @@ static int kbd_is_on_hold; +/* Nonzero means delete a process right away if it exits. */ +static int delete_exited_processes; + #ifdef subprocesses /* Mask of bits indicating the descriptors that we wait for input on. */ @@ -352,9 +355,6 @@ /* The largest descriptor currently in use for gpm mouse input. */ static int max_gpm_desc; -/* Nonzero means delete a process right away if it exits. */ -static int delete_exited_processes; - /* Indexed by descriptor, gives the process (if any) for that descriptor */ Lisp_Object chan_process[MAXDESC]; @@ -7667,13 +7667,13 @@ Qargs = intern_c_string ("args"); staticpro (&Qargs); -#ifdef subprocesses DEFVAR_BOOL ("delete-exited-processes", &delete_exited_processes, doc: /* *Non-nil means delete processes immediately when they exit. A value of nil means don't delete them until `list-processes' is run. */); delete_exited_processes = 1; +#ifdef subprocesses DEFVAR_LISP ("process-connection-type", &Vprocess_connection_type, doc: /* Control type of device used to communicate with subprocesses. Values are nil to use a pipe, or t or `pty' to use a pty.