From b2d499107c616ed7a5c68cee205a8cdde7f16149 Mon Sep 17 00:00:00 2001
From: whiteshark0 <whiteshark0@b956fd51-792f-4845-bead-9b4dfca2ff2c>
Date: Sat, 16 May 2009 13:22:03 +0000
Subject: some fixes in party manager

git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/branches/experimental@1736 b956fd51-792f-4845-bead-9b4dfca2ff2c
---
 Lua/src/base/UParty.pas | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/Lua/src/base/UParty.pas b/Lua/src/base/UParty.pas
index 1566e4e8..d7392d4b 100644
--- a/Lua/src/base/UParty.pas
+++ b/Lua/src/base/UParty.pas
@@ -444,6 +444,7 @@ begin
   end
   else
   begin
+    Result := False;
     for I := 0 to High(Modes) do
       if (Modes[I].TeamCount and (1 shl (CountTeams - 1)) <> 0) then
       begin
@@ -542,6 +543,7 @@ begin
   if (bPartyStarted) and (CurRound >= 0) and (CurRound <= High(Rounds)) then
   begin
     Rounds[CurRound].Winner := WinBin;
+    Result := true;
   end
   else
     Result := false;
-- 
cgit v1.2.3