--- a/hedgewars/HHHandlers.inc	Thu Jan 12 22:07:36 2006 +0000
+++ b/hedgewars/HHHandlers.inc	Sun Jan 15 14:14:12 2006 +0000
@@ -338,6 +338,7 @@
       end;
    if not TestCollisionXwithGear(Gear, Sign(Gear.dX)) then Gear.X:= Gear.X + Gear.dX;
 
+   AddIntersectorsCR(Gear);
    if not HHTestCollisionYwithGear(Gear, 1) then
    begin
    Gear.Y:= Gear.Y + 1;
@@ -369,7 +370,6 @@
    end
    end
    end;
-   AddIntersectorsCR(Gear);
    SetAllHHToActive
    end
 end;