From: Alain Schneble <a.s@realize.ch>
Date: Sun, 21 Feb 2016 02:36:25 +0000 (+1100)
Subject: Respect DNS timeouts
X-Git-Tag: emacs-26.0.90~2520^2~5
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=799367921033a9bfca27109ba934cb2981c436f9;p=emacs.git

Respect DNS timeouts

* src/process.c (check_for_dns): If the async DNS request
failed and the associated process is still in "connect" state,
deactivate the process and set status to "failed".
---

diff --git a/src/process.c b/src/process.c
index a59e4182e4c..1f83327b3c2 100644
--- a/src/process.c
+++ b/src/process.c
@@ -4706,7 +4706,7 @@ check_for_dns (Lisp_Object proc)
       ip_addresses = Fnreverse (ip_addresses);
     }
   /* The DNS lookup failed. */
-  else if (!EQ (p->status, Qconnect))
+  else if (EQ (p->status, Qconnect))
     {
       deactivate_process (proc);
       pset_status (p, (list2