# HG changeset patch
# User Kim F. Storm <storm@cua.dk>
# Date 1085483863 0
# Node ID d5fe47c900eeaee1797f344d4789ab3a4e42d224
# Parent  8ead5534c80fd2592ecc9f8989a3e2f20bb35107
(wait_reading_process_input): Check connect_wait_mask
before actually accepting connection in case it has already been
accepted due to recursion.

diff -r 8ead5534c80f -r d5fe47c900ee src/process.c
--- a/src/process.c	Tue May 25 11:17:03 2004 +0000
+++ b/src/process.c	Tue May 25 11:17:43 2004 +0000
@@ -4581,7 +4581,8 @@
 		}
 	    }
 #ifdef NON_BLOCKING_CONNECT
-	  if (check_connect && FD_ISSET (channel, &Connecting))
+	  if (check_connect && FD_ISSET (channel, &Connecting)
+	      && FD_ISSET (channel, &connect_wait_mask))
 	    {
 	      struct Lisp_Process *p;