fix `current-subprocess-custodian-mode'

An 'interrupt setting was treated as a 'kill setting.

Merge to v5.3
This commit is contained in:
Matthew Flatt 2012-07-25 20:45:52 -06:00
parent df4fed7011
commit d8461837f9

View File

@ -8532,7 +8532,7 @@ static void kill_subproc(Scheme_Object *o, void *data)
static void interrupt_subproc(Scheme_Object *o, void *data)
{
(void)do_subprocess_kill(o, scheme_true, 0);
(void)do_subprocess_kill(o, scheme_false, 0);
}
#endif