fix build
authorkoda
Sun, 22 Nov 2009 04:28:30 +0000
changeset 2639 8c6044bf1bb8
parent 2638 3d1289184c14
child 2640 fa096fb04b24
fix build
hedgewars/uMisc.pas
--- a/hedgewars/uMisc.pas	Sun Nov 22 01:50:38 2009 +0000
+++ b/hedgewars/uMisc.pas	Sun Nov 22 04:28:30 2009 +0000
@@ -132,7 +132,7 @@
 
 	AttackBar: LongInt = 0; // 0 - none, 1 - just bar at the right-down corner, 2 - like in WWP
 
-var	i: LongInt;
+	i: LongInt;
 
 type HwColor4f = record
 	r, g, b, a: byte
@@ -544,10 +544,6 @@
 begin
 RectToStr:= '(x: ' + inttostr(rect.x) + '; y: ' + inttostr(rect.y) + '; w: ' + inttostr(rect.w) + '; h: ' + inttostr(rect.h) + ')'
 end;
-
-{$IFNDEF IPHONEOS}
-var i: LongInt;
-{$ENDIF}
 {$ENDIF}
 
 function doSurfaceConversion(tmpsurf: PSDL_Surface): PSDL_Surface;