# HG changeset patch
# User unc0rr
# Date 1369158022 -14400
# Node ID 2d5e6ed2cba799b09c5dab8610d50b3cc7b0a533
# Parent  3a38c945369753a2c948d632ab50e6abecfe955f
Fix issue with last hog's part of team health bar

diff -r 3a38c9453697 -r 2d5e6ed2cba7 hedgewars/uWorld.pas
--- a/hedgewars/uWorld.pas	Tue May 21 21:30:42 2013 +0400
+++ b/hedgewars/uWorld.pas	Tue May 21 21:40:22 2013 +0400
@@ -1320,7 +1320,7 @@
         // draw health bars right border
         inc(r.x, cTeamHealthWidth + 2);
         r.w:= 3;
-        DrawTextureFromRect(TeamHealthBarWidth + 16, cScreenHeight + DrawHealthY + smallScreenOffset, @r, HealthTex);
+        DrawTextureFromRect(TeamHealthBarWidth + 15, cScreenHeight + DrawHealthY + smallScreenOffset, @r, HealthTex);
 
         if not highlight and (not hasGone) then
             for i:= 0 to cMaxHHIndex do
@@ -1357,7 +1357,7 @@
             // draw health bar
             r.w:= TeamHealthBarWidth + 1;
             r.h:= HealthTex^.h - 4;
-            DrawTextureFromRect(16, cScreenHeight + DrawHealthY + smallScreenOffset + 2, @r, HealthTex);
+            DrawTextureFromRect(15, cScreenHeight + DrawHealthY + smallScreenOffset + 2, @r, HealthTex);
             if not hasGone and (TeamHealth > 1) then
                 begin
                 Tint(Clan^.Color shl 8 or $FF);