--- a/hedgewars/GSHandlers.inc Mon May 04 01:36:39 2009 +0000
+++ b/hedgewars/GSHandlers.inc Wed May 06 16:56:01 2009 +0000
@@ -739,7 +739,12 @@
HedgehogChAngle(HHGear);
-if TestCollisionXwithGear(HHGear, hwSign(HHGear^.dX)) then SetLittle(HHGear^.dX);
+if TestCollisionXwithGear(HHGear, hwSign(HHGear^.dX)) then
+ begin
+ {$IFDEF DEBUGFILE}if HHGear^.dX.QWordValue > 1 then AddFileLog('Stopping hedgehog after rope attack due to wall collision');{$ENDIF}
+ SetLittle(HHGear^.dX);
+ end;
+
if HHGear^.dY.isNegative and TestCollisionYwithGear(HHGear, -1) then HHGear^.dY:= _0;
HHGear^.X:= HHGear^.X + HHGear^.dX;
HHGear^.Y:= HHGear^.Y + HHGear^.dY;