hedgewars/uTeams.pas
changeset 4889 f71e30eb1d37
parent 4881 35e6269227b6
child 4900 8ad0e23e6d63
--- a/hedgewars/uTeams.pas	Sun Jan 30 20:04:34 2011 +0100
+++ b/hedgewars/uTeams.pas	Sun Jan 30 17:54:02 2011 -0500
@@ -372,7 +372,9 @@
     if not hasGone then
         for i:= 0 to cMaxHHIndex do
             if Hedgehogs[i].Gear <> nil then
-                inc(NewTeamHealthBarWidth, Hedgehogs[i].Gear^.Health);
+                inc(NewTeamHealthBarWidth, Hedgehogs[i].Gear^.Health)
+            else if Hedgehogs[i].GearHidden <> nil then
+                inc(NewTeamHealthBarWidth, Hedgehogs[i].GearHidden^.Health);
 
     TeamHealth:= NewTeamHealthBarWidth;
     if NewTeamHealthBarWidth > MaxTeamHealth then