hedgewars/uAmmos.pas
changeset 6631 930d5f070196
parent 6624 e049b5bb0ad1
child 6700 e04da46ee43c
--- a/hedgewars/uAmmos.pas	Sun Feb 05 18:20:02 2012 -0500
+++ b/hedgewars/uAmmos.pas	Sun Feb 05 20:08:17 2012 -0500
@@ -74,7 +74,8 @@
             Count:= cnts[a];
         inc(mi[Ammoz[a].Slot])
         end
-    end
+    end;
+AmmoMenuInvalidated:= true;
 end;
 
 procedure AddAmmoStore;
@@ -251,6 +252,7 @@
             Ammo^[Slot, ami + 1].Count:= 0
             end;
     until not b;
+AmmoMenuInvalidated:= true;
 end;
 
 procedure OnUsedAmmo(var Hedgehog: THedgehog);
@@ -379,7 +381,6 @@
             end;
         end
     end;
-AmmoMenuInvalidated:= true;
 end;
 
 procedure SwitchNotHeldAmmo(var Hedgehog: THedgehog);