hedgewars/uAmmos.pas
changeset 3935 5ca27a0e9a63
parent 3836 833c0f32e326
child 3939 e6fddcb04dc2
--- a/hedgewars/uAmmos.pas	Sat Oct 09 05:57:46 2010 +0200
+++ b/hedgewars/uAmmos.pas	Sat Oct 09 18:00:53 2010 +0200
@@ -47,7 +47,7 @@
 var shoppa: boolean;
 
 implementation
-uses uMisc, uGears, uWorld, uLocale, uConsole;
+uses uMisc, uGears, uWorld, uLocale, uConsole, uMobile;
 
 type TAmmoCounts = array[TAmmoType] of Longword;
 var StoresList: array[0..Pred(cMaxHHs)] of PHHAmmo;
@@ -246,7 +246,8 @@
                 SwitchNotHeldAmmo(Hedgehog)
                 end
             end
-    end
+    end;
+perfExt_NewTurnBeginning;
 end;
 
 function  HHHasAmmo(var Hedgehog: THedgehog; Ammo: TAmmoType): boolean;
@@ -354,7 +355,8 @@
         else
             ShowCrosshair:= (Propz and ammoprop_NoCrosshair) = 0;
         end
-    end
+    end;
+perfExt_NewTurnBeginning;
 end;
 
 procedure SwitchNotHeldAmmo(var Hedgehog: THedgehog);