* Fix a netorder issue. From mantis #12858

git-svn-id: trunk@13507 -

packages/fcl-net/src/ssockets.pp

@@ -564,7 +564,7 @@ begin
       end;
   addr.family := AF_INET;
   addr.port := ShortHostToNet(FPort);
-  addr.addr := a.s_addr;
+  addr.addr := HostToNet(a.s_addr);
 
   If  Sockets.fpConnect(ASocket, @addr, sizeof(addr))<>0 then
     raise ESocketError.Create(seConnectFailed, [Format('%s:%d',[FHost, FPort])]);