hedgewars/uVisualGears.pas
changeset 15794 95db10dcad71
parent 15607 f8c1492601fe
child 15795 da1bb21e6fbf
--- a/hedgewars/uVisualGears.pas	Mon Dec 07 16:59:44 2020 +0100
+++ b/hedgewars/uVisualGears.pas	Sun Dec 13 21:16:25 2020 +0100
@@ -265,7 +265,8 @@
                                         end
                                     else if (Gear^.Tex <> nil) and (((Gear^.State = 0) and ((Gear^.Hedgehog = nil) or (Gear^.Hedgehog^.Team = CurrentTeam))) or (Gear^.State = 2)) then
                                         DrawTextureCentered(round(Gear^.X) + WorldDx, round(Gear^.Y) + WorldDy, Gear^.Tex);
-               vgtSmallDamageTag: DrawTextureCentered(round(Gear^.X) + WorldDx, round(Gear^.Y) + WorldDy, Gear^.Tex);
+               vgtSmallDamageTag: if Gear^.Tex <> nil then
+                                    DrawTextureCentered(round(Gear^.X) + WorldDx, round(Gear^.Y) + WorldDy, Gear^.Tex);
                vgtHealthTag: if Gear^.Tex <> nil then
                                begin
                                if Gear^.Frame = 0 then