Fix the color of tag with damage by shotgun shot
authorunc0rr
Tue, 29 May 2007 21:56:35 +0000
changeset 531 1f6c6eb0ea02
parent 530 f0b962214436
child 532 8136a5363586
Fix the color of tag with damage by shotgun shot
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);