--- a/hedgewars/uFLNetProtocol.pas Sat Nov 28 00:18:04 2015 +0300
+++ b/hedgewars/uFLNetProtocol.pas Mon Nov 30 23:25:18 2015 +0300
@@ -165,6 +165,7 @@
procedure handler_CONNECTED(var p: TCmdParami);
begin
sendUI(mtConnected, nil, 0);
+ writeln('Server features version ', p.param1);
sendNet('PROTO' + #10 + '51');
sendNet('NICK' + #10 + 'qmlfrontend');
end;
@@ -274,6 +275,7 @@
procedure handler_PROTO(var p: TCmdParami);
begin
+ writeln('Protocol ', p.param1)
end;
procedure handler_REMOVE_TEAM(var p: TCmdParamS);