hedgewars/uTeams.pas
changeset 12322 9aa483762025
parent 12276 12f28d866c76
child 12332 657a8d63c99d
--- a/hedgewars/uTeams.pas	Tue Apr 25 02:50:28 2017 +0200
+++ b/hedgewars/uTeams.pas	Tue Apr 25 04:54:46 2017 +0200
@@ -49,7 +49,7 @@
     uGearsUtils, uGearsList, uVisualGearsList, uTextures
     {$IFDEF USE_TOUCH_INTERFACE}, uTouch{$ENDIF};
 
-var GameOver: boolean;
+var TeamsGameOver: boolean;
     NextClan: boolean;
 
 function CheckForWin: boolean;
@@ -77,7 +77,7 @@
 if (not bBetweenTurns) and isInMultiShoot then
     TurnReaction();
 
-if not GameOver then
+if not TeamsGameOver then
     begin
     if AliveCount = 0 then
         begin // draw
@@ -118,6 +118,7 @@
             end;
     SendStats;
     end;
+TeamsGameOver:= true;
 GameOver:= true
 end;