hedgewars/uMisc.pas
changeset 1625 37aae47943ce
parent 1560 e140bc57ff68
child 1753 2ccba26f1aa4
--- a/hedgewars/uMisc.pas	Fri Jan 09 11:55:05 2009 +0000
+++ b/hedgewars/uMisc.pas	Fri Jan 09 14:47:54 2009 +0000
@@ -244,7 +244,7 @@
 end;
 
 procedure SendStat(sit: TStatInfoType; s: shortstring);
-const stc: array [TStatInfoType] of char = 'rDkK';
+const stc: array [TStatInfoType] of char = 'rDkKH';
 begin
 SendIPC('i' + stc[sit] + s)
 end;