hedgewars/uUtils.pas
branchqmlfrontend
changeset 10430 899a30018ede
parent 10424 4be6cd55f1cf
child 10515 7705784902e1
--- a/hedgewars/uUtils.pas	Sun Sep 28 00:49:04 2014 +0400
+++ b/hedgewars/uUtils.pas	Sun Sep 28 01:17:55 2014 +0400
@@ -313,7 +313,7 @@
 
 
 function Str2PChar(const s: shortstring): PChar;
-var i :Integer ;
+var i: Integer;
 begin
    for i:= 1 to Length(s) do
       begin