diff -r fef7f2d908bf -r 8842c71d16bf hedgewars/uCollisions.pas
--- a/hedgewars/uCollisions.pas	Mon Apr 21 16:51:14 2008 +0000
+++ b/hedgewars/uCollisions.pas	Mon Apr 21 18:43:07 2008 +0000
@@ -200,7 +200,7 @@
    for i:= 0 to Pred(Count) do
     with cinfos[i] do
       if (Gear <> cGear) and
-         (sqr(mx - x) + sqr(my - y) <= sqr(Radius + Gear^.Radius)) and
+         (sqr(mx - x) + sqr(my - y) <= sqr(Radius + Gear^.Radius + 2)) and
          ((mx > x) xor (Dir > 0)) then
          if (cGear^.Kind in [gtHedgehog, gtMine]) then
              begin
@@ -248,7 +248,7 @@
    for i:= 0 to Pred(Count) do
     with cinfos[i] do
       if (Gear <> cGear) and
-         (sqr(mx - x) + sqr(my - y) <= sqr(Radius + Gear^.Radius)) and
+         (sqr(mx - x) + sqr(my - y) <= sqr(Radius + Gear^.Radius + 2)) and
          ((my > y) xor (Dir > 0)) then
          if (cGear^.Kind in [gtHedgehog, gtMine]) then
              begin