# HG changeset patch
# User Pavel Jan���k <Pavel@Janik.cz>
# Date 1016475685 0
# Node ID da239fc7bb6c0594c650631edddeee9d002fd6f7
# Parent  48c58612a775ab3b2530b04ab78994af5b32c959
(wait_reading_process_input): Move variables `pname' and `pnamelen' down
where they are used.

diff -r 48c58612a775 -r da239fc7bb6c src/process.c
--- a/src/process.c	Mon Mar 18 18:18:21 2002 +0000
+++ b/src/process.c	Mon Mar 18 18:21:25 2002 +0000
@@ -4207,8 +4207,6 @@
 	  if (check_connect && FD_ISSET (channel, &Connecting))
 	    {
 	      struct Lisp_Process *p;
-	      struct sockaddr pname;
-	      int pnamelen = sizeof(pname);
 
 	      FD_CLR (channel, &connect_wait_mask);
 	      if (--num_pending_connects < 0)
@@ -4229,16 +4227,21 @@
 		  xerrno = errno;
 	      }
 #else
-	      /* If connection failed, getpeername will fail.  */
-	      xerrno = 0;
-	      if (getpeername(channel, &pname, &pnamelen) < 0)
-		{
-		  /* Obtain connect failure code through error slippage.  */
-		  char dummy;
-		  xerrno = errno;
-		  if (errno == ENOTCONN && read(channel, &dummy, 1) < 0)
+	      {
+		struct sockaddr pname;
+		int pnamelen = sizeof(pname);
+
+		/* If connection failed, getpeername will fail.  */
+		xerrno = 0;
+		if (getpeername(channel, &pname, &pnamelen) < 0)
+		  {
+		    /* Obtain connect failure code through error slippage.  */
+		    char dummy;
 		    xerrno = errno;
-		}
+		    if (errno == ENOTCONN && read(channel, &dummy, 1) < 0)
+		      xerrno = errno;
+		  }
+	      }
 #endif
 	      if (xerrno)
 		{