panels: fix crash on liquid collision

[d2df-sdl.git] / src / game / renders / opengl / r_holmes.pas

diff --git a/src/game/renders/opengl/r_holmes.pas b/src/game/renders/opengl/r_holmes.pas
index e04fbc42a196201086df63a259102b260c3b8568..f83fa6de9cd2823a93dca3dfc91bf2494cb272bd 100644 (file)
--- a/src/game/renders/opengl/r_holmes.pas
+++ b/src/game/renders/opengl/r_holmes.pas
@@ -15,6 +15,10 @@
 {$INCLUDE ../../../shared/a_modes.inc}
 unit r_holmes;
 
+  {$IFDEF USE_GLES1}
+    {$FATAL Desktop OpenGL required for current Holmes implementation}
+  {$ENDIF}
+
 interface
 
 procedure r_Holmes_Draw ();
@@ -42,7 +46,8 @@ uses
   xprofiler,
   sdlcarcass,
   fui_common, fui_ctls,
-  fui_gfx_gl,
+  fui_gfx,
+  r_fui_gfx_gl,
   {$IFDEF ENABLE_GFX}
     g_gfx,
   {$ENDIF}
@@ -54,7 +59,7 @@ uses
   MAPDEF, g_options;
 
 var
-  hlmContext: TGxContext = nil;
+  hlmContext: r_fui_gfx_gl.TGxContext = nil;
   vpx, vpy: Integer;
   vpw, vph: Integer;
   laserSet: Boolean = false;
@@ -803,7 +808,7 @@ var
 begin
   if (gPlayer1 = nil) then exit;
 
-  if (hlmContext = nil) then hlmContext := TGxContext.Create();
+  if (hlmContext = nil) then hlmContext := r_fui_gfx_gl.TGxContext.Create();
 
   gxSetContext(hlmContext);
   try