Mercurial Mercurial > hedgewars / diff
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | file | latest | revisions | annotate | diff | comparison | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
hedgewars/uWorld.pas
changeset 146 458f4f58c1b6
parent 110 330a2dbacd67
child 154 5667e6f38704 
--- a/hedgewars/uWorld.pas	Thu Sep 14 17:20:50 2006 +0000
+++ b/hedgewars/uWorld.pas	Fri Sep 15 13:47:01 2006 +0000
@@ -241,13 +241,13 @@
       r.h:= team.NameTag.h;
       SDL_UpperBlit(team.NameTag, nil, Surface, @r);
       r:= team.HealthRect;
-      r.w:= 2 + team.TeamHealth;
+      r.w:= 2 + team.TeamHealthBarWidth;
       DrawFromStoreRect(cScreenWidth div 2,
                         Team.DrawHealthY,
                         @r, Surface);
       inc(r.x, cTeamHealthWidth + 2);
       r.w:= 3;
-      DrawFromStoreRect(cScreenWidth div 2 + team.TeamHealth + 2,
+      DrawFromStoreRect(cScreenWidth div 2 + team.TeamHealthBarWidth + 2,
                         Team.DrawHealthY,
                         @r, Surface);
       team:= team.Next
hedgewars