# HG changeset patch
# User Karl Heuer <kwzh@gnu.org>
# Date 824922673 0
# Node ID 38829b121db772a33426a74a4f451f832f757c52
# Parent  3c86ac6a871a3d5a4c94cc49baa29b0ce89ecd99
(main): Convert port to network byte order.

diff -r 3c86ac6a871a -r 38829b121db7 lib-src/tcp.c
--- a/lib-src/tcp.c	Wed Feb 21 16:32:37 1996 +0000
+++ b/lib-src/tcp.c	Wed Feb 21 17:11:13 1996 +0000
@@ -122,7 +122,7 @@
   bzero (&sockin, sizeof (sockin));
   sockin.sin_family = host->h_addrtype;
   bcopy (host->h_addr, &sockin.sin_addr, host->h_length);
-  sockin.sin_port = port;
+  sockin.sin_port = htons (port);
   if ((server = socket (AF_INET, SOCK_STREAM, 0)) < 0)
     {
       perror ("socket");