--- deliantra/Deliantra-Client/DC.pm	2006/04/24 10:19:39	1.46
+++ deliantra/Deliantra-Client/DC.pm	2006/04/25 11:18:48	1.48
@@ -212,7 +212,7 @@
 sub new_from_opengl {
    my ($class, $w, $h, $cb) = @_;
 
-   $class->new (w => $w, h => $h, render_cb => $cb)
+   $class->new (w => $w || 1, h => $h || 1, render_cb => $cb)
 }
 
 sub topot {
@@ -245,7 +245,7 @@
 
    my ($tw, $th) = @$self{qw(w h)};
 
-   unless ($tw && $th) {
+   unless ($tw > 0 && $th > 0) {
       $tw = $th = 1;
       $data = "\x00" x 64;
    }