# HG changeset patch
# User Karl Heuer <kwzh@gnu.org>
# Date 771639894 0
# Node ID e54617027a4702985c68a7b6a634d10b2d8f21f8
# Parent  cabad721720f841210709e12c1069a2b2241c913
(create_process): Set input_wait_mask before forking.

diff -r cabad721720f -r e54617027a47 src/process.c
--- a/src/process.c	Tue Jun 14 21:57:11 1994 +0000
+++ b/src/process.c	Wed Jun 15 00:24:54 1994 +0000
@@ -1254,6 +1254,10 @@
 #endif /* not BSD4_1 */
 #endif /* SIGCHLD */
 
+  FD_SET (inchannel, &input_wait_mask);
+  if (inchannel > max_process_desc)
+    max_process_desc = inchannel;
+
   /* Until we store the proper pid, enable sigchld_handler
      to recognize an unknown pid as standing for this process.
      It is very important not to let this `marker' value stay
@@ -1413,10 +1417,6 @@
   
   XFASTINT (XPROCESS (process)->pid) = pid;
 
-  FD_SET (inchannel, &input_wait_mask);
-  if (inchannel > max_process_desc)
-    max_process_desc = inchannel;
-
   /* If the subfork execv fails, and it exits,
      this close hangs.  I don't know why.
      So have an interrupt jar it loose.  */