hedgewars/uTeams.pas
changeset 7010 10a0a31804f3
parent 7001 89488f5b99ca
child 7028 0f60591f3a16
--- a/hedgewars/uTeams.pas	Wed May 02 19:16:12 2012 -0400
+++ b/hedgewars/uTeams.pas	Thu May 03 00:20:58 2012 -0400
@@ -384,7 +384,7 @@
             begin
             Hedgehogs[0].King:= true;
             Hedgehogs[0].Hat:= 'crown';
-            Hedgehogs[0].Effects[hePoisoned] := false;
+            Hedgehogs[0].Effects[hePoisoned] := 0;
             h:= Hedgehogs[0].Gear^.Health;
             Hedgehogs[0].Gear^.Health:= hwRound(int2hwFloat(th)*_0_375);
             if Hedgehogs[0].Gear^.Health > h then