hedgewars/uGears.pas
changeset 4834 3763a386a427
parent 4833 204d26924532
child 4835 a6924450e694
--- a/hedgewars/uGears.pas	Wed Jan 12 22:01:15 2011 +0300
+++ b/hedgewars/uGears.pas	Wed Jan 12 22:02:43 2011 +0300
@@ -1096,7 +1096,7 @@
 
 i:= 0;
 Gear:= PGear(1);
-while (i < cLandMines) and {(Gear <> nil)} do // disable this check until better solution found
+while (i < cLandMines) {and (Gear <> nil)} do // disable this check until better solution found
     begin
     Gear:= AddGear(0, 0, gtMine, 0, _0, _0, 0);
     FindPlace(Gear, false, 0, LAND_WIDTH);