[Emacs-diffs] feature/async-dns e5b2f25: Save correct server data

[Lars Ingebrigtsen]

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

    Save correct server data
    
    * process.c (connect_network_socket): Save the correct contact
    info for servers.
---
 src/process.c |    5 +++--
 1 files changed, 3 insertions(+), 2 deletions(-)

diff --git a/src/process.c b/src/process.c
index aef74d3..06fb685 100644
--- a/src/process.c
+++ b/src/process.c
@@ -3218,7 +3218,7 @@ void connect_network_socket (Lisp_Object proc, 
Lisp_Object ip_addresses)
        }
 #endif
 
-      contact = Fplist_put (contact, p->is_server? QCremote: QClocal,
+      contact = Fplist_put (contact, p->is_server? QClocal: QCremote,
                            conv_sockaddr_to_lisp (sa, addrlen));
 #ifdef HAVE_GETSOCKNAME
       if (!p->is_server)
@@ -3577,7 +3577,8 @@ usage: (make-network-process &rest ARGS)  */)
     {
       /* The "connection" function gets it bind info from the address we're
         given, so use this dummy address if nothing is specified. */
-      host = build_string ("127.0.0.1");
+      if (family != AF_LOCAL)
+       host = build_string ("127.0.0.1");
     }
   else
     {