changeset 1354 | a8dcdeb88a43 |
parent 1352 | 405ad07cf875 |
child 1355 | 8e167aa3b2e4 |
--- a/hedgewars/uTeams.pas Tue Oct 14 14:35:52 2008 +0000 +++ b/hedgewars/uTeams.pas Wed Oct 15 11:50:16 2008 +0000 @@ -370,7 +370,9 @@ with TeamsArray[i]^ do begin AddChatString('* '+ TeamName + ' is gone'); - //for i:= 0 to cMaxHHIndex do Hedgehogs[i].Gear:= nil; + for i:= 0 to cMaxHHIndex do + with Hedgehogs[i] do + Gear^.State:= Gear^.State and not gstHHDriven; hasGone:= true end end;