hedgewars/uStore.pas
changeset 2705 2b5625c4ec16
parent 2701 3a8560c00f78
child 2716 b9ca1bfca24f
--- a/hedgewars/uStore.pas	Sun Jan 24 07:37:00 2010 +0000
+++ b/hedgewars/uStore.pas	Sun Jan 24 13:37:03 2010 +0000
@@ -1001,9 +1001,10 @@
 procedure RenderHealth(var Hedgehog: THedgehog);
 var s: shortstring;
 begin
-str(Hedgehog.Gear^.Health, s);
-if Hedgehog.HealthTagTex <> nil then FreeTexture(Hedgehog.HealthTagTex);
-Hedgehog.HealthTagTex:= RenderStringTex(s, Hedgehog.Team^.Clan^.Color, fnt16)
+	str(Hedgehog.Gear^.Health, s);
+	if Hedgehog.HealthTagTex <> nil then
+		FreeTexture(Hedgehog.HealthTagTex);
+	Hedgehog.HealthTagTex:= RenderStringTex(s, Hedgehog.Team^.Clan^.Color, fnt16)
 end;
 
 function  LoadImage(const filename: string; imageFlags: LongInt): PSDL_Surface;