hedgewars/uFLNetProtocol.pas
branchqmlfrontend
changeset 11843 01f88c3b7b66
parent 11462 33a0e3a14ddc
--- a/hedgewars/uFLNetProtocol.pas	Tue Aug 02 23:08:17 2016 +0300
+++ b/hedgewars/uFLNetProtocol.pas	Thu Aug 11 23:05:14 2016 +0300
@@ -16,7 +16,6 @@
     PHandler = procedure (var t: TCmdData);
 
 var isInRoom: boolean;
-    myNickname: shortstring;
 
 procedure onRoomLeaving();
 begin
@@ -310,8 +309,8 @@
 begin
     sendUI(mtConnected, nil, 0);
     //writeln('Server features version ', p.param1);
-    sendNet('PROTO' + #10 + '51');
-    sendNet('NICK' + #10 + 'qmlfrontend');
+    sendNet('PROTO' + #10 + '52');
+    sendNet('NICK' + #10 + myNickname);
 end;
 
 procedure handler_EM(var p: TCmdParam);