another silly mistake
authornemo
Wed, 24 Aug 2011 23:37:03 -0400
changeset 5680 c0107c991dda
parent 5679 505c6448069b
child 5681 5fc750c7f2b4
another silly mistake
hedgewars/uAmmos.pas
--- a/hedgewars/uAmmos.pas	Wed Aug 24 18:07:37 2011 -0400
+++ b/hedgewars/uAmmos.pas	Wed Aug 24 23:37:03 2011 -0400
@@ -184,7 +184,8 @@
     a: PAmmo;
 begin
 a:= GetAmmoEntry(Hedgehog, ammo);
-if (a^.AmmoType = amNothing) or (a^.Count <> AMMO_INFINITE) then
+cnt:= a^.Count;
+if (a^.AmmoType = amNothing) or (cnt <> AMMO_INFINITE) then
     begin
     inc(cnt, Ammoz[ammo].NumberInCase);
     AddAmmo(Hedgehog, ammo, cnt)