From 6585afce2ccd8e7c5ccb3bb3599d4723b00a0433 Mon Sep 17 00:00:00 2001
From: tobigun <tobigun@b956fd51-792f-4845-bead-9b4dfca2ff2c>
Date: Tue, 28 Oct 2008 20:16:05 +0000
Subject: some compiler warnings/hints removed

git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@1485 b956fd51-792f-4845-bead-9b4dfca2ff2c
---
 src/screens/UScreenPartyNewRound.pas | 4 +---
 1 file changed, 1 insertion(+), 3 deletions(-)

(limited to 'src/screens/UScreenPartyNewRound.pas')

diff --git a/src/screens/UScreenPartyNewRound.pas b/src/screens/UScreenPartyNewRound.pas
index 3d518eca..01de9df7 100644
--- a/src/screens/UScreenPartyNewRound.pas
+++ b/src/screens/UScreenPartyNewRound.pas
@@ -153,8 +153,6 @@ begin
 end;
 
 constructor TScreenPartyNewRound.Create;
-var
-  I:    integer;
 begin
   inherited Create;
 
@@ -217,7 +215,7 @@ var
   function GetTeamPlayers(const Num: Byte): String;
   var
     Players: Array of String;
-    J: Byte;
+    //J: Byte;
   begin            // to-do : Party
     if (Num-1 >= {PartySession.Teams.NumTeams}0) then
       exit;
-- 
cgit v1.2.3