# HG changeset patch
# User unc0rr
# Date 1294169600 -10800
# Node ID f2a3e1a51f4dd2e208a178ddf28e5369ceecdb26
# Parent  53c2f0f92281a9574bf952cb8dc86305ff138b1f
Clearly state which port is IPC connection on

diff -r 53c2f0f92281 -r f2a3e1a51f4d hedgewars/uIO.pas
--- a/hedgewars/uIO.pas	Tue Jan 04 16:15:47 2011 +0300
+++ b/hedgewars/uIO.pas	Tue Jan 04 22:33:20 2011 +0300
@@ -99,18 +99,18 @@
 procedure InitIPC;
 var ipaddr: TIPAddress;
 begin
-WriteToConsole('Init SDL_Net... ');
-SDLTry(SDLNet_Init = 0, true);
-fds:= SDLNet_AllocSocketSet(1);
-SDLTry(fds <> nil, true);
-WriteLnToConsole(msgOK);
-WriteToConsole('Establishing IPC connection... ');
-{$HINTS OFF}
-SDLTry(SDLNet_ResolveHost(ipaddr, '127.0.0.1', ipcPort) = 0, true);
-{$HINTS ON}
-IPCSock:= SDLNet_TCP_Open(ipaddr);
-SDLTry(IPCSock <> nil, true);
-WriteLnToConsole(msgOK)
+    WriteToConsole('Init SDL_Net... ');
+    SDLTry(SDLNet_Init = 0, true);
+    fds:= SDLNet_AllocSocketSet(1);
+    SDLTry(fds <> nil, true);
+    WriteLnToConsole(msgOK);
+    WriteToConsole('Establishing IPC connection to tcp 127.0.0.1:' + IntToStr(ipcPort));
+    {$HINTS OFF}
+    SDLTry(SDLNet_ResolveHost(ipaddr, '127.0.0.1', ipcPort) = 0, true);
+    {$HINTS ON}
+    IPCSock:= SDLNet_TCP_Open(ipaddr);
+    SDLTry(IPCSock <> nil, true);
+    WriteLnToConsole(msgOK)
 end;
 
 procedure CloseIPC;