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 a59e4182e4cd476070af354eb0783eba340303aa..1f83327b3c253e111ef9900b7019a3b132760798 100644 (file)
--- 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