--- deliantra/Deliantra-Client/DC.pm 2006/04/30 08:09:44 1.49 +++ deliantra/Deliantra-Client/DC.pm 2006/05/11 23:41:45 1.50 @@ -203,14 +203,14 @@ sub new_from_layout { my ($class, $layout, %arg) = @_; - my ($w, $h, $data) = $layout->render; + my ($w, $h, $data, $format, $internalformat) = $layout->render; $class->new ( w => $w, h => $h, data => $data, - format => GL_ALPHA, - internalformat => GL_ALPHA, + format => $format, + internalformat => $format, type => GL_UNSIGNED_BYTE, %arg, )