hedgewars/GSHandlers.inc
changeset 3280 5e21acf0c59a
parent 3236 4ab3917d7d44
child 3299 aff2315a2843
--- a/hedgewars/GSHandlers.inc	Sat Apr 03 06:29:24 2010 +0000
+++ b/hedgewars/GSHandlers.inc	Sat Apr 03 06:39:17 2010 +0000
@@ -957,6 +957,7 @@
     begin
     DeleteGear(Gear);
     isCursorVisible:= false;
+    ApplyAmmoChanges(PHedgehog(Gear^.Hedgehog)^);
     exit
     end;
 
@@ -1777,6 +1778,7 @@
         end;
     DeleteGear(Gear);
     isCursorVisible:= false;
+    ApplyAmmoChanges(PHedgehog(Gear^.Hedgehog)^);
     exit
     end;
 
@@ -2751,6 +2753,7 @@
         end;
     DeleteGear(Gear);
     isCursorVisible:= false;
+    ApplyAmmoChanges(PHedgehog(Gear^.Hedgehog)^);
 //    if Gear^.Tex <> nil then FreeTexture(Gear^.Tex);
 //    Gear^.Tex:= RenderStringTex(trmsg[sidFuel] + ': ' + inttostr(round(Gear^.Health / 20)) + '%', cWhiteColor, fntSmall)
     //AddCaption(trmsg[sidFuel]+': '+inttostr(round(Gear^.Health/20))+'%', cWhiteColor, capgrpAmmostate);