--- a/hedgewars/uAIMisc.pas	Sun Jan 28 16:40:04 2007 +0000
+++ b/hedgewars/uAIMisc.pas	Sun Jan 28 20:58:06 2007 +0000
@@ -302,7 +302,7 @@
 repeat
 pX:= hwRound(Gear^.X);
 pY:= hwRound(Gear^.Y);
-if pY + cHHRadius >= cWaterLine then exit;
+if pY + cHHRadius >= cWaterLine then exit(false);
 if (Gear^.State and gstFalling) <> 0 then
    begin
    inc(GoInfo.Ticks);
@@ -380,12 +380,10 @@
    end
    end;
 if (pX <> hwRound(Gear^.X)) and ((Gear^.State and gstFalling) = 0) then
-   begin
-   Result:= true;
-   exit(Result)
-   end
+   exit(true);
 until (pX = hwRound(Gear^.X)) and (pY = hwRound(Gear^.Y)) and ((Gear^.State and gstFalling) = 0);
-HHJump(AltGear, jmpHJump, GoInfo)
+HHJump(AltGear, jmpHJump, GoInfo);
+HHGo:= Result
 end;
 
 function AIrndSign(num: LongInt): LongInt;