hedgewars/HHHandlers.inc
changeset 394 4c017ae1226a
parent 393 db01cc79f278
child 408 6c3da4907d00
--- a/hedgewars/HHHandlers.inc	Mon Feb 05 19:33:24 2007 +0000
+++ b/hedgewars/HHHandlers.inc	Mon Feb 05 20:26:13 2007 +0000
@@ -116,7 +116,7 @@
        posCaseAmmo: begin
                     a:= TAmmoType(Gear^.State);
                     AddAmmo(PHedgehog(HH^.Hedgehog), a);
-                    s:= trammo[Ammoz[a].NameId];
+                    s:= trammo[Ammoz[a].NameId] + '(+' + IntToStr(Ammoz[a].NumberInCase) + ')';
                     AddCaption(s, PHedgehog(HH^.Hedgehog)^.Team^.Color, capgrpAmmoinfo);
                     end;
      posCaseHealth: begin