hedgewars/uTeams.pas
changeset 3100 5fe9c4ac4c99
parent 3076 7e246257adaa
child 3112 f1bbe35ddb83
--- a/hedgewars/uTeams.pas	Sat Mar 27 05:45:45 2010 +0000
+++ b/hedgewars/uTeams.pas	Sat Mar 27 08:59:10 2010 +0000
@@ -55,7 +55,7 @@
             King: boolean;  // Flag for a bunch of hedgehog attributes
             Unplaced: boolean;  // Flag for hog placing mode
             Timer: Longword;
-			Poisoned: boolean;
+            Poisoned: boolean;
             end;
 
     TTeam = record
@@ -365,6 +365,7 @@
           begin
           Hedgehogs[0].King:= true;
           Hedgehogs[0].Hat:= 'crown';
+					Hedgehogs[0].Poisoned := false;
           h:= Hedgehogs[0].Gear^.Health;
           Hedgehogs[0].Gear^.Health:= hwRound(int2hwFloat(th)*_0_375);
           if Hedgehogs[0].Gear^.Health > h then