changeset 11822 | 4600dcb9db4f |
parent 11765 | 10860d4bca22 |
child 11847 | 38e7206a5df4 |
--- a/hedgewars/uGearsHedgehog.pas Sun May 15 13:18:34 2016 +0200 +++ b/hedgewars/uGearsHedgehog.pas Sun May 15 14:29:37 2016 +0300 @@ -732,8 +732,7 @@ PlaySound(sndShotgunReload); inc(HH^.Health, Gear^.Health); HH^.Hedgehog^.Effects[hePoisoned] := 0; - str(Gear^.Health, s); - s:= '+' + s; + s:= '+' + IntToStr(Gear^.Health); AddCaption(ansistring(s), HH^.Hedgehog^.Team^.Clan^.Color, capgrpAmmoinfo); RenderHealth(HH^.Hedgehog^); RecountTeamHealth(HH^.Hedgehog^.Team);