diff -r 7db64c269a5b -r a02f276035e8 hedgewars/uGears.pas --- a/hedgewars/uGears.pas Wed Mar 03 02:36:52 2010 +0000 +++ b/hedgewars/uGears.pas Wed Mar 03 02:56:18 2010 +0000 @@ -1644,10 +1644,6 @@ begin AddGear(0, 0, gtATStartGame, 0, _0, _0, 2000); -// HACK: just for testing explosives! -if (GameFlags and gfMines) <> 0 then - GameFlags:= (GameFlags or gfExplosives) and not gfMines; - if (TrainingFlags and tfSpawnTargets) <> 0 then begin TrainingTargetGear:= AddGear(0, 0, gtTarget, 0, _0, _0, 0); @@ -1664,11 +1660,11 @@ Gear^.TriggerId:= i + 1; FindPlace(Gear, false, 0, LAND_WIDTH); end; - if ((GameFlags and gfExplosives) <> 0) then - for i:= 0 to Pred(cLandAdditions) do +// No game flag for this for now +// if ((GameFlags and gfExplosives) <> 0) then + for i:= 0 to Pred(cExplosives) do begin Gear:= AddGear(0, 0, gtExplosives, 0, _0, _0, 0); - Gear^.TriggerId:= i + 1; FindPlace(Gear, false, 0, LAND_WIDTH); end; end;