my first merge :(
authorHenek
Mon, 13 Dec 2010 04:53:48 +0100
changeset 4515 9b30be246742
parent 4513 1dd97c710f5a (current diff)
parent 4514 c62e6e522849 (diff)
child 4516 ecf012a762d8
my first merge :(
--- a/hedgewars/uTeams.pas	Mon Dec 13 04:52:23 2010 +0100
+++ b/hedgewars/uTeams.pas	Mon Dec 13 04:53:48 2010 +0100
@@ -379,7 +379,7 @@
         begin
         MaxTeamHealth:= NewTeamHealthBarWidth;
         RecountAllTeamsHealth;
-        end else NewTeamHealthBarWidth:= (NewTeamHealthBarWidth * cTeamHealthWidth) div MaxTeamHealth
+        end else if NewTeamHealthBarWidth > 0 then NewTeamHealthBarWidth:= (NewTeamHealthBarWidth * cTeamHealthWidth) div MaxTeamHealth
     end;
 
 RecountClanHealth(team^.Clan);