hedgewars/GSHandlers.inc
changeset 9076 6ae43e121882
parent 9073 6cffcbef02e4
child 9077 e8d9d94c122f
--- a/hedgewars/GSHandlers.inc	Wed May 29 10:51:21 2013 +0200
+++ b/hedgewars/GSHandlers.inc	Wed May 29 06:51:12 2013 -0400
@@ -5140,7 +5140,7 @@
     vg: PVisualGear;
 begin
     HHGear := Gear^.Hedgehog^.Gear;
-    if (Gear^.Message and gmAttack <> 0) or (Gear^.Health = 0) or (HHGear = nil) or (HHGear^.Damage <> 0) then
+    if (Gear^.Message and gmAttack <> 0) or (Gear^.Health = 0) or (HHGear = nil) or (HHGear^.Damage <> 0) or (HHGear^.dX.QWordValue > 4294967)  then
         begin
         StopSoundChan(Gear^.SoundChannel);
         DeleteGear(Gear);