--- a/hedgewars/uGears.pas	Sun Oct 31 18:04:02 2010 +0100
+++ b/hedgewars/uGears.pas	Sun Oct 31 18:04:21 2010 +0100
@@ -601,7 +601,10 @@
                 if (team^.Clan^.Teams[i]^.Hedgehogs[0].Gear <> nil) then k:= true;
             if not k then
                 for i:= 0 to Pred(team^.Clan^.TeamsNumber) do
+                    begin
+                    team^.Clan^.Teams[i]^.hasGone:= true;
                     TeamGoneEffect(team^.Clan^.Teams[i]^)
+                    end
             end;
         inc(KilledHHs);
         RecountTeamHealth(team)
@@ -1200,13 +1203,12 @@
 
 if ((GameFlags and gfForts) = 0) then
     begin
-    // TODO: exclude each other or allow both, mines and explosives, on same map?
-    for i:= 0 to Pred(cLandMines) do
-        begin
-        Gear:= AddGear(0, 0, gtMine, 0, _0, _0, 0);
-        FindPlace(Gear, false, 0, LAND_WIDTH);
-        end;
-    // No game flag for this for now
+    if ((GameFlags and gfMines) <> 0) then
+        for i:= 0 to Pred(cLandMines) do
+            begin
+            Gear:= AddGear(0, 0, gtMine, 0, _0, _0, 0);
+            FindPlace(Gear, false, 0, LAND_WIDTH);
+            end;
     for i:= 0 to Pred(cExplosives) do
         begin
         Gear:= AddGear(0, 0, gtExplosives, 0, _0, _0, 0);