--- deliantra/Deliantra-Client/DC.pm	2006/04/09 00:06:09	1.14
+++ deliantra/Deliantra-Client/DC.pm	2006/04/09 00:12:58	1.15
@@ -76,8 +76,8 @@
    my ($class, %data) = @_;
 
    my $self = bless {
-      internalFormat => GL_RGBA,
-      format         => GL_RGBA8,
+      internalformat => GL_RGBA,
+      format         => GL_RGBA,
       %data,
    }, $class;
 
@@ -126,7 +126,7 @@
       width          => $w,
       height         => $h,
       data           => $data,
-      internalFormat => GL_ALPHA8,
+      internalformat => GL_ALPHA8,
       format         => GL_ALPHA,
    )
 }
@@ -182,7 +182,7 @@
    
    if (defined $data) {
       glTexImage2D GL_TEXTURE_2D, 0,
-                   $self->{internalFormat},
+                   $self->{internalformat},
                    $self->{width}, $self->{height},
                    0,
                    $self->{format},
@@ -190,7 +190,7 @@
                    $data;
    } else {
       glCopyTexImage2D GL_TEXTURE_2D, 0,
-                   $self->{internalFormat},
+                   $self->{internalformat},
                    0, 0,
                    $self->{width}, $self->{height},
                    0;