[Emacs-diffs] Changes to emacs/src/process.c

[Kim F. Storm]

Index: emacs/src/process.c
diff -c emacs/src/process.c:1.390 emacs/src/process.c:1.391
*** emacs/src/process.c:1.390   Wed Jan  8 10:35:03 2003
--- emacs/src/process.c Wed Jan  8 17:16:12 2003
***************
*** 2974,2980 ****
              if (getsockname (s, (struct sockaddr *)&sa1, &len1) == 0)
                {
                  ((struct sockaddr_in *)(lres->ai_addr))->sin_port = 
sa1.sin_port;
!                 service = make_number (sa1.sin_port);
                  contact = Fplist_put (contact, QCservice, service);
                }
            }
--- 2974,2980 ----
              if (getsockname (s, (struct sockaddr *)&sa1, &len1) == 0)
                {
                  ((struct sockaddr_in *)(lres->ai_addr))->sin_port = 
sa1.sin_port;
!                 service = make_number (ntohs (sa1.sin_port));
                  contact = Fplist_put (contact, QCservice, service);
                }
            }