# HG changeset patch
# User unc0rr
# Date 1313425098 -14400
# Node ID 47cc28299baa91e2dd76388f14c68aabeb862f6f
# Parent  a1eb7555f4399a7dfaeea39b25823fcf488a01d7
Why so suspicious?

diff -r a1eb7555f439 -r 47cc28299baa hedgewars/uCollisions.pas
--- a/hedgewars/uCollisions.pas	Mon Aug 15 10:16:18 2011 -0400
+++ b/hedgewars/uCollisions.pas	Mon Aug 15 20:18:18 2011 +0400
@@ -84,8 +84,9 @@
 if (Count > (MAXRECTSINDEX-20)) then
     begin
     t:= GearsList;
-    while (t <> nil) and (t^.Kind <> gtMine) do t:= t^.NextGear;
-    if (t <> nil) and (t^.Kind = gtMine) then DeleteGear(t)
+    while (t <> nil) and (t^.Kind <> gtMine) do 
+        t:= t^.NextGear;
+    if (t <> nil) then DeleteGear(t)
     end;
 end;