--- deliantra/Deliantra-Client/DC.pm	2006/04/18 01:36:12	1.39
+++ deliantra/Deliantra-Client/DC.pm	2006/04/19 23:37:48	1.41
@@ -23,7 +23,7 @@
 
 use AnyEvent;
 use BerkeleyDB;
-use SDL::OpenGL;
+use CFClient::OpenGL;
 
 our %GL_EXT;
 our $GL_VERSION;
@@ -143,7 +143,7 @@
 
 use Scalar::Util;
 
-use SDL::OpenGL;
+use CFClient::OpenGL;
 
 my %TEXTURES;
 
@@ -267,7 +267,9 @@
    $self->{s} = $self->{w} / $tw;
    $self->{t} = $self->{h} / $th;
 
-   $self->{name} ||= (glGenTextures 1)->[0];
+   glGetError;
+
+   $self->{name} ||= glGenTexture;
 
    glBindTexture GL_TEXTURE_2D, $self->{name};
 
@@ -303,7 +305,7 @@
 
    delete $TEXTURES{$self+0};
 
-   glDeleteTextures delete $self->{name}
+   glDeleteTexture delete $self->{name}
       if $self->{name};
 }