--- a/hedgewars/uGearsHedgehog.pas Fri Mar 29 14:47:01 2013 +0100
+++ b/hedgewars/uGearsHedgehog.pas Fri Mar 29 10:54:12 2013 -0400
@@ -793,7 +793,7 @@
var da: LongWord;
begin
with HHGear^.Hedgehog^ do
- if ((CurAmmoType = amRope) and ((HHGear^.State and (gstMoving or gstHHJumping)) = gstMoving))
+ if ((CurAmmoGear <> nil) and (CurAmmoGear^.AmmoType = amRope) and ((HHGear^.State and (gstMoving or gstHHJumping)) = gstMoving))
or ((CurAmmoType = amPortalGun) and ((HHGear^.State and gstMoving) <> 0)) then
da:= 2
else da:= 1;