changeset 394 | 4c017ae1226a |
parent 393 | db01cc79f278 |
child 534 | 92fb2b0d5117 |
--- a/hedgewars/uAmmos.pas Mon Feb 05 19:33:24 2007 +0000 +++ b/hedgewars/uAmmos.pas Mon Feb 05 20:26:13 2007 +0000 @@ -107,7 +107,7 @@ if hhammo^[slot, ami].Count > 0 then ammos[hhammo^[slot, ami].AmmoType]:= hhammo^[slot, ami].Count; -if ammos[ammo] <> AMMO_INFINITE then inc(ammos[ammo]); +if ammos[ammo] <> AMMO_INFINITE then inc(ammos[ammo], Ammoz[ammo].NumberInCase); FillAmmoStore(hhammo, ammos) end;