diff -r 212d3b459658 -r 9ce1cf4e5a32 hedgewars/GSHandlers.inc
--- a/hedgewars/GSHandlers.inc	Tue Sep 13 21:25:13 2011 -0400
+++ b/hedgewars/GSHandlers.inc	Wed Sep 14 17:17:50 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);