--- a/hedgewars/GSHandlers.inc	Wed Sep 14 15:23:40 2011 +0200
+++ b/hedgewars/GSHandlers.inc	Wed Sep 14 17:52:46 2011 +0200
@@ -4209,7 +4209,7 @@
     begin
         Gear^.State := Gear^.State or gstCollision;
         Gear^.State := Gear^.State and not gstMoving;
-        if not calcSlopeTangent(Gear, x, y, tx, ty, 255)
+        if not CalcSlopeTangent(Gear, x, y, tx, ty, 255)
            or (DistanceI(tx,ty) < _12) then // reject shots at too irregular terrain
         begin
             loadNewPortalBall(Gear, true);