1 files changed, 3 insertions, 1 deletions

diff --git a/src/process.c b/src/process.c
index 90e18d72014..dafd5330d30 100644
--- a/src/process.c
+++ b/src/process.c
@@ -4563,12 +4563,14 @@ check_for_dns (Lisp_Object proc)
         }
 
       ip_addresses = Fnreverse (ip_addresses);
+      freeaddrinfo (p->dns_request->ar_result);
+      /* Free the calling array, too? FIXME */
       connect_network_socket (proc, ip_addresses);
       return 1;
     }
 
   pset_status (p, Qfailed);
-  return 0;
+  return 1;
 }
 #endif /* HAVE_GETADDRINFO_A */