hedgewars/uTeams.pas
changeset 10643 8d6063af793a
parent 10635 8e8b320eefad
child 10646 0be6442946b1
--- a/hedgewars/uTeams.pas	Mon Dec 08 23:00:13 2014 +0300
+++ b/hedgewars/uTeams.pas	Mon Dec 08 15:02:43 2014 -0500
@@ -854,9 +854,9 @@
             with TeamsArray[i]^.Hedgehogs[h] do
                 begin
                 if Gear <> nil then
-                    DeleteGear(Gear);
+                    DeleteGearStage(Gear, true);
                 if GearHidden <> nil then
-                    DeleteGear(GearHidden);
+                    DeleteGearStage(GearHidden, true);
 
                 FreeAndNilTexture(NameTagTex);
                 FreeAndNilTexture(HealthTagTex);