hedgewars/uGearsRender.pas
changeset 14771 ab7bf5036314
parent 14770 533ac9774279
child 14799 bbec6b28d072
--- a/hedgewars/uGearsRender.pas	Sun Apr 07 18:21:14 2019 +0200
+++ b/hedgewars/uGearsRender.pas	Sun Apr 07 19:26:16 2019 +0200
@@ -1645,7 +1645,7 @@
 
 procedure RenderGearTimer(Gear: PGear; x, y: LongInt);
 begin
-if Gear^.RenderTimer and (Gear^.Tex <> nil) then
+if Gear^.RenderTimer and (Gear^.Tex <> nil) and (isShowGearInfo or (not (Gear^.Kind in [gtMine, gtSMine, gtAirMine]))) then
     DrawTextureCentered(x + 8, y + 8, Gear^.Tex);
 end;