--- deliantra/Deliantra-Client/DC/UI.pm	2006/04/19 21:38:05	1.137
+++ deliantra/Deliantra-Client/DC/UI.pm	2006/04/19 23:37:49	1.138
@@ -89,7 +89,7 @@
 
 use strict;
 
-use SDL::OpenGL;
+use CFClient::OpenGL;
 
 sub new {
    my $class = shift;
@@ -326,7 +326,7 @@
 our @ISA = CFClient::UI::Base::;
 
 use strict;
-use SDL::OpenGL;
+use CFClient::OpenGL;
 
 sub new {
    my $class = shift;
@@ -484,7 +484,7 @@
 
 our @ISA = CFClient::UI::Bin::;
 
-use SDL::OpenGL;
+use CFClient::OpenGL;
 
 sub new {
    my ($class, %arg) = @_;
@@ -567,7 +567,7 @@
 
 our @ISA = CFClient::UI::Bin::;
 
-use SDL::OpenGL;
+use CFClient::OpenGL;
 
 sub size_request {
    my ($self) = @_;
@@ -609,7 +609,7 @@
 
 our @ISA = CFClient::UI::Bin::;
 
-use SDL::OpenGL;
+use CFClient::OpenGL;
 
 my @tex = 
       map { new_from_file CFClient::Texture CFClient::find_rcfile $_ }
@@ -750,7 +750,7 @@
 
 use List::Util qw(max sum);
 
-use SDL::OpenGL;
+use CFClient::OpenGL;
 
 sub new {
    my $class = shift;
@@ -1001,7 +1001,7 @@
 
 our @ISA = CFClient::UI::Base::;
 
-use SDL::OpenGL;
+use CFClient::OpenGL;
 
 sub new {
    my ($class, %arg) = @_;
@@ -1113,7 +1113,7 @@
 
 our @ISA = CFClient::UI::Label::;
 
-use SDL::OpenGL;
+use CFClient::OpenGL;
 
 sub new {
    my $class = shift;
@@ -1280,7 +1280,7 @@
 
 our @ISA = CFClient::UI::EntryBase::;
 
-use SDL::OpenGL;
+use CFClient::OpenGL;
 
 sub key_down {
    my ($self, $ev) = @_;
@@ -1303,7 +1303,7 @@
 
 our @ISA = CFClient::UI::Label::;
 
-use SDL::OpenGL;
+use CFClient::OpenGL;
 
 my @tex =
       map { new_from_file CFClient::Texture CFClient::find_rcfile $_ }
@@ -1366,7 +1366,7 @@
       map { new_from_file CFClient::Texture CFClient::find_rcfile $_ }
          qw(c1_checkbox_bg.png c1_checkbox_active.png);
 
-use SDL::OpenGL;
+use CFClient::OpenGL;
 
 sub new {
    my $class = shift;
@@ -1426,7 +1426,7 @@
 
 our @ISA = CFClient::UI::Base::;
 
-use SDL::OpenGL;
+use CFClient::OpenGL;
 
 my %tex = (
    food => [
@@ -1533,7 +1533,7 @@
 
 use strict;
 
-use SDL::OpenGL;
+use CFClient::OpenGL;
 
 our @ISA = CFClient::UI::DrawBG::;
 
@@ -1668,7 +1668,7 @@
 
 our @ISA = CFClient::UI::HBox::;
 
-use SDL::OpenGL;
+use CFClient::OpenGL;
 
 sub new {
    my $class = shift;
@@ -1824,7 +1824,7 @@
 
 package CFClient::UI::Animator;
 
-use SDL::OpenGL;
+use CFClient::OpenGL;
 
 our @ISA = CFClient::UI::Bin::;
 
@@ -1907,7 +1907,7 @@
 
 our @ISA = CFClient::UI::Container::;
 
-use SDL::OpenGL;
+use CFClient::OpenGL;
 
 sub check_size {
    my ($self) = @_;