From: DeaDDooMER <deaddoomer@deadsoftware.ru>
Date: Thu, 16 Feb 2023 19:20:00 +0000 (+0300)
Subject: gl: shade titlepic in main menu
X-Git-Url: http://deadsoftware.ru/gitweb?a=commitdiff_plain;h=cf4041fda8857d538748aee9ddb3a13cad6157ab;p=d2df-sdl.git

gl: shade titlepic in main menu
---

diff --git a/src/game/renders/opengl/r_render.pas b/src/game/renders/opengl/r_render.pas
index 3c2cd6f..bfd0d82 100644
--- a/src/game/renders/opengl/r_render.pas
+++ b/src/game/renders/opengl/r_render.pas
@@ -1188,7 +1188,14 @@ implementation
       // TODO F key handle
       case gState of
         STATE_NONE: (* do nothing *) ;
-        STATE_MENU: r_Common_DrawBackground(GameWad + ':TEXTURES/TITLE');
+        STATE_MENU:
+        begin
+          r_Common_DrawBackground(GameWad + ':TEXTURES/TITLE');
+          {$IFDEF ENABLE_MENU}
+            if g_ActiveWindow <> nil then
+              r_Draw_FillRect(0, 0, gScreenWidth, gScreenHeight, 0, 0, 0, 105);
+          {$ENDIF}
+        end;
         STATE_FOLD:
         begin
           if EndingGameCounter > 0 then