# HG changeset patch # User unc0rr # Date 1180475795 0 # Node ID 1f6c6eb0ea02da2b496a9cab77bdb84ebf1f9c04 # Parent f0b962214436e575caf0222dc69a9cac07f8f828 Fix the color of tag with damage by shotgun shot diff -r f0b962214436 -r 1f6c6eb0ea02 hedgewars/uGears.pas --- a/hedgewars/uGears.pas Tue May 29 21:55:45 2007 +0000 +++ b/hedgewars/uGears.pas Tue May 29 21:56:35 2007 +0000 @@ -704,7 +704,7 @@ inc(t^.Damage, dmg); if t^.Kind = gtHedgehog then begin - AddDamageTag(hwRound(Gear^.X), hwRound(Gear^.Y), dmg, Gear); + AddDamageTag(hwRound(Gear^.X), hwRound(Gear^.Y), dmg, t); inc(hh^.DamageGiven, dmg) end; DeleteCI(t);