From aecdb6a2e201c7d21ac5f6beed935e8bca3179e1 Mon Sep 17 00:00:00 2001
From: tobigun <tobigun@b956fd51-792f-4845-bead-9b4dfca2ff2c>
Date: Fri, 2 May 2008 09:35:58 +0000
Subject: bugfix: USDX crashed while unloading opengl because of a bug in
 opengl12.pas (Glu was unloaded twice, because the handle of the main gl-lib
 was overwritten with that of glu)

git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@1050 b956fd51-792f-4845-bead-9b4dfca2ff2c
---
 Game/Code/lib/JEDI-SDL/OpenGL/Pas/opengl12.pas | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'Game/Code/lib/JEDI-SDL/OpenGL')

diff --git a/Game/Code/lib/JEDI-SDL/OpenGL/Pas/opengl12.pas b/Game/Code/lib/JEDI-SDL/OpenGL/Pas/opengl12.pas
index dd27bfbc..f7d2f352 100644
--- a/Game/Code/lib/JEDI-SDL/OpenGL/Pas/opengl12.pas
+++ b/Game/Code/lib/JEDI-SDL/OpenGL/Pas/opengl12.pas
@@ -8064,7 +8064,9 @@ begin
 
   if GLUHandle <> INVALID_MODULEHANDLE then
   begin
+    {$IFDEF KYLIX}
     GLHandle := TModuleHandle(GLUHandle); // Kylix compatiblilty trick
+    {$ENDIF}
 
     gluBeginCurve := GetModuleSymbol( GLUHandle, 'gluBeginCurve');
     gluBeginPolygon := GetModuleSymbol( GLUHandle, 'gluBeginPolygon');
-- 
cgit v1.2.3