disable special case for parachute on rope. legacy? Without it, parachute behaves as one expects
authornemo
Sun, 07 Aug 2011 12:25:21 -0400
changeset 5515 3768e9a6ec40
parent 5513 79dd457193e6
child 5517 80bc6c0be5d4
disable special case for parachute on rope. legacy? Without it, parachute behaves as one expects
hedgewars/GSHandlers.inc
--- a/hedgewars/GSHandlers.inc	Sun Aug 07 12:06:53 2011 -0400
+++ b/hedgewars/GSHandlers.inc	Sun Aug 07 12:25:21 2011 -0400
@@ -1366,7 +1366,7 @@
     DeleteGear(Gear)
 end;
 
-procedure WaitCollision;
+(*procedure WaitCollision;
 begin
     with HHGear^ do
     begin
@@ -1376,7 +1376,7 @@
     RopePoints.Count := 0;
     Gear^.Elasticity := _0;
     Gear^.doStep := @doStepRopeAfterAttack
-end;
+end;*)
 
 begin
     HHGear := Gear^.Hedgehog^.Gear;
@@ -1582,9 +1582,9 @@
             with Gear^.Hedgehog^ do
                 begin
                 PlaySound(sndRopeRelease);
-                if CurAmmoType <> amParachute then
-                    WaitCollision
-                else
+                //if CurAmmoType <> amParachute then
+                //    WaitCollision
+                //else
                     DeleteMe
                 end
         end