Fix uninitialised variable
authorunc0rr
Wed, 15 Oct 2008 17:01:34 +0000
changeset 1362 6298e9dbd33c
parent 1361 afdcf39c6bea
child 1363 bcd4cb0245f0
Fix uninitialised variable
hedgewars/uTeams.pas
--- a/hedgewars/uTeams.pas	Wed Oct 15 17:00:35 2008 +0000
+++ b/hedgewars/uTeams.pas	Wed Oct 15 17:01:34 2008 +0000
@@ -360,8 +360,7 @@
 procedure TeamGone(s: shortstring);
 var i, t: LongInt;
 begin
-i:= 0;
-
+t:= 0;
 while (t < cMaxTeams)
 	and (TeamsArray[t] <> nil)
 	and (TeamsArray[t]^.TeamName <> s) do inc(t);