hedgewars/uWorld.pas
changeset 7016 8b34f46e10c1
parent 7013 54db061b5710
child 7022 107651b3c5a0
--- a/hedgewars/uWorld.pas	Thu May 03 13:25:40 2012 +0200
+++ b/hedgewars/uWorld.pas	Thu May 03 16:04:38 2012 +0100
@@ -1107,7 +1107,7 @@
 var i, t, h: LongInt;
     r: TSDL_Rect;
     tdx, tdy: Double;
-    s: string[15];
+    s: shortstring;
     highlight: Boolean;
     smallScreenOffset, offsetX, offsetY, screenBottom: LongInt;
     VertexBuffer: array [0..3] of TVertex2f;
@@ -1464,7 +1464,7 @@
         inc(CountTicks, Lag);
     if (GameType = gmtDemo) and (CountTicks >= 1000) then
         begin
-        i:=GameTicks div 1000;
+        i:= GameTicks div 1000;
         t:= i mod 60;
         s:= inttostr(t);
         if t < 10 then