Github/emacs
2
0
Fork 1
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-23 05:17:35 +00:00
Code Issues Projects Releases Packages Wiki Activity

Don't use `subprocesses' in msdos.c.

Browse source 
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.
This commit is contained in:
Eli Zaretskii 2010-07-11 08:55:06 +03:00
parent dce3463576
commit 462aa963ef
3 changed files with 13 additions and 17 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

9
src/ChangeLog
View file

@ -1,3 +1,12 @@
2010-07-11 Eli Zaretskii <eliz@gnu.org>
* process.c (syms_of_process) <delete-exited-processes>: Define
even if !subprocesses.
(delete_exited_processes): Ditto.
* msdos.c (syms_of_msdos) <delete-exited-processes>: Remove DEFVAR.
(delete_exited_processes): Don't define.
2010-07-10 Chong Yidong <cyd@stupidchicken.com>
* frame.c (make_frame): Initialize menu_bar_lines and

13
src/msdos.c
View file

@ -4701,13 +4701,6 @@ abort (void)
}
#endif
/* The following variables are required so that cus-start.el won't
complain about unbound variables. */
#ifndef subprocesses
/* Nonzero means delete a process right away if it exits (process.c). */
static int delete_exited_processes;
#endif
void
syms_of_msdos (void)
{
@ -4725,12 +4718,6 @@ syms_of_msdos (void)
This variable is used only by MS-DOS terminals. */);
Vdos_unsupported_char_glyph = make_number ('\177');
#endif
#ifndef 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 = 0;
#endif
defsubr (&Srecent_doskeys);

8
src/process.c
View file

@ -310,6 +310,9 @@ Lisp_Object QCname, QCtype;
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 @@ static int max_keyboard_desc;
/* 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 @@ syms_of_process (void)
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.