From: Karl Heuer <kwzh@gnu.org>
Date: Thu, 21 Dec 1995 17:13:25 +0000 (+0000)
Subject: (Fopen_network_stream): Call bind_polling_period earlier.
X-Git-Tag: emacs-19.34~2083
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=798b64bbf67df09a69e91f8184974bf7cca3af83;p=emacs.git

(Fopen_network_stream): Call bind_polling_period earlier.
---

diff --git a/src/process.c b/src/process.c
index 115eb8faca4..1afb701dd28 100644
--- a/src/process.c
+++ b/src/process.c
@@ -1643,6 +1643,13 @@ Fourth arg SERVICE is name of the service desired, or an integer\n\
       port = svc_info->s_port;
     }
 
+  /* Slow down polling to every ten seconds.
+     Some kernels have a bug which causes retrying connect to fail
+     after a connect.  Polling can interfere with gethostbyname too.  */
+#ifdef POLL_FOR_INPUT
+  bind_polling_period (10);
+#endif
+
 #ifndef TERM
   while (1)
     {
@@ -1697,13 +1704,6 @@ Fourth arg SERVICE is name of the service desired, or an integer\n\
   if (interrupt_input)
     unrequest_sigio ();
 
-  /* Slow down polling to every ten seconds.
-     Some kernels have a bug which causes retrying connect to fail
-     after a connect.  */
-#ifdef POLL_FOR_INPUT
-  bind_polling_period (10);
-#endif
-
  loop:
   if (connect (s, (struct sockaddr *) &address, sizeof address) == -1
       && errno != EISCONN)