hedgewars/GSHandlers.inc
changeset 945 4ead9cde4e14
parent 940 769adb0ad082
child 963 5f8bb3470563
--- a/hedgewars/GSHandlers.inc	Thu May 22 17:25:12 2008 +0000
+++ b/hedgewars/GSHandlers.inc	Sat May 24 17:34:06 2008 +0000
@@ -1235,7 +1235,8 @@
 HHGear:= PHedgehog(Gear^.Hedgehog)^.Gear;
 HHGear^.Y:= HHGear^.Y + HHGear^.dY; // hedgehog falling to collect cases
 HHGear^.dY:= HHGear^.dY + cGravity;
-if TestCollisionYwithGear(HHGear, 1) then
+if TestCollisionYwithGear(HHGear, 1)
+   or CheckGearDrowning(HHGear) then
    begin
    DeleteGear(Gear);
    AfterAttack