[Emacs-diffs] feature/async-dns e4c58cf: Add sanity check for checking async DNS

[Lars Ingebrigtsen]

branch: feature/async-dns
commit e4c58cf3feb853f2808204e85529d9365b31a6b4
Author: Lars Ingebrigtsen <address@hidden>
Commit: Lars Ingebrigtsen <address@hidden>

    Add sanity check for checking async DNS
    
    * src/process.c (check_for_dns): Disregard processes that have
    already been killed.
---
 src/process.c |    4 ++++
 1 files changed, 4 insertions(+), 0 deletions(-)

diff --git a/src/process.c b/src/process.c
index 0c8fc43..b232e33 100644
--- a/src/process.c
+++ b/src/process.c
@@ -4602,6 +4602,10 @@ check_for_dns (Lisp_Object proc)
   if (! p->dns_requests)
     return Qnil;
 
+  /* This process should not already be connected (or killed). */
+  if (p->infd != 0)
+    return Qnil;
+
   ret = gai_error (p->dns_requests[0]);
   if (ret == EAI_INPROGRESS)
     return Qt;