changeset 540 | b06c5aace2fa |
parent 534 | 92fb2b0d5117 |
child 547 | b81a055f2d06 |
--- a/hedgewars/uTeams.pas Thu Jun 07 18:09:54 2007 +0000 +++ b/hedgewars/uTeams.pas Mon Jun 11 15:52:32 2007 +0000 @@ -131,6 +131,7 @@ with CurrentTeam^.Hedgehogs[CurrentTeam^.CurrHedgehog] do if Gear <> nil then begin + AttacksNum:= 0; Gear^.Message:= 0; Gear^.Z:= cHHZ; RemoveGearFromList(Gear); @@ -150,7 +151,6 @@ with CurrentTeam^.Hedgehogs[CurrentTeam^.CurrHedgehog] do begin - AttacksNum:= 0; with Gear^ do begin Z:= cCurrHHZ;