[ViewVC] Diff of: cvs/deliantra/Deliantra-Client/DC/Texture.pm

Comparing deliantra/Deliantra-Client/DC/Texture.pm (file contents):
Revision 1.7 by root, Thu Jun 15 15:33:58 2006 UTC vs.
Revision 1.9 by root, Sat Jun 17 15:48:59 2006 UTC

                    $self->{type},
                    $data;
       gl_check "uploading texture %dx%d if=%x f=%x t=%x",
                $tw, $th, $self->{internalformat},  $self->{format}, $self->{type};
    } else {
+      exists $self->{render_cb} or die;
       glCopyTexImage2D GL_TEXTURE_2D, 0,
                    $self->{internalformat},
                    0, 0,
                    $tw, $th,
                    0;
       gl_check "copying to texture %dx%d if=%x",
                $tw, $th, $self->{internalformat};
    }
 }
+sub shutdown {
+   my ($self) = @_;
+   glDeleteTexture $self->{name}
+      if $self->{name};
+}
 sub DESTROY {
    my ($self) = @_;
    delete $TEXTURES{$self+0};
-   glDeleteTexture delete $self->{name}
+   $self->shutdown;
-      if $self->{name};
 }
 $CFClient::OpenGL::INIT_HOOK{"CFClient::Texture"} = sub {
+   # first mark all existing texture names as in-use, in case the context lost textures
+   glBindTexture GL_TEXTURE_2D, $_->{name}
+      for values %TEXTURES;
    $_->upload
       for values %TEXTURES;
 };
+$CFClient::OpenGL::SHUTDOWN_HOOK{"CFClient::Texture"} = sub {
+   $_->shutdown
+      for values %TEXTURES;
+};
 1;
 =back
 =head1 AUTHOR

-–
+Removed lines
-+
+Added lines
-<
+Changed lines
->
+Changed lines