From: Karl Heuer <kwzh@gnu.org>
Date: Wed, 15 Jun 1994 00:24:54 +0000 (+0000)
Subject: (create_process): Set input_wait_mask before forking.
X-Git-Tag: emacs-19.34~7960
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=3081bf8d2511f64fa498df997c375bac2c7a8689;p=emacs.git

(create_process): Set input_wait_mask before forking.
---

diff --git a/src/process.c b/src/process.c
index ebbbb93b9ed..e2f7f6a9794 100644
--- a/src/process.c
+++ b/src/process.c
@@ -1254,6 +1254,10 @@ create_process (process, new_argv, current_dir)
 #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 @@ create_process (process, new_argv, current_dir)
   
   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.  */