diff -r b49d87499398 -r b62e567f17b9 hedgewars/uGears.pas --- a/hedgewars/uGears.pas Sun Mar 14 17:04:36 2010 +0000 +++ b/hedgewars/uGears.pas Sun Mar 14 20:22:00 2010 +0000 @@ -55,7 +55,6 @@ Tex: PTexture; Z: Longword; IntersectGear: PGear; - TriggerId: Longword; FlightTime: Longword; uid: Longword; SoundChannel: LongInt @@ -95,7 +94,7 @@ implementation uses uWorld, uMisc, uStore, uConsole, uSound, uTeams, uRandom, uCollisions, uLand, uIO, uLandGraphics, - uAIMisc, uLocale, uAI, uAmmos, uTriggers, uStats, uVisualGears, uScript, + uAIMisc, uLocale, uAI, uAmmos, uStats, uVisualGears, uScript, {$IFDEF GLES11} gles11; {$ELSE} @@ -507,7 +506,6 @@ with Gear^ do AddFileLog('Delete: #' + inttostr(uid) + ' (' + inttostr(hwRound(x)) + ',' + inttostr(hwRound(y)) + '), d(' + floattostr(dX) + ',' + floattostr(dY) + ') type = ' + inttostr(ord(Kind))); {$ENDIF} -if Gear^.TriggerId <> 0 then TickTrigger(Gear^.TriggerId); if CurAmmoGear = Gear then CurAmmoGear:= nil; if FollowGear = Gear then FollowGear:= nil; RemoveGearFromList(Gear); @@ -1694,7 +1692,6 @@ for i:= 0 to Pred(cLandAdditions) do begin Gear:= AddGear(0, 0, gtMine, 0, _0, _0, 0); - Gear^.TriggerId:= i + 1; FindPlace(Gear, false, 0, LAND_WIDTH); end; // No game flag for this for now