--- a/hedgewars/uCommands.pas	Thu Dec 23 22:01:19 2010 +0300
+++ b/hedgewars/uCommands.pas	Thu Dec 23 22:05:42 2010 +0300
@@ -60,7 +60,7 @@
 if c in ['/', '$'] then Delete(CmdStr, 1, 1) else c:= '/';
 s:= '';
 SplitBySpace(CmdStr, s);
-{$IFDEF DEBUGFILE}AddFileLog('[Cmd] ' + c + CmdStr + ' (' + inttostr(length(CmdStr)) + ')');{$ENDIF}
+{$IFDEF DEBUGFILE}AddFileLog('[Cmd] ' + c + CmdStr + ' (' + inttostr(length(s)) + ')');{$ENDIF}
 t:= Variables;
 while t <> nil do
       begin