--- deliantra/Deliantra-Client/DC.pm 2006/04/24 08:38:35 1.45 +++ deliantra/Deliantra-Client/DC.pm 2006/04/24 13:01:13 1.47 @@ -51,7 +51,7 @@ sub find_rcfile($) { my $path; - for (@INC) { + for (grep !ref, @INC) { $path = "$_/CFClient/resources/$_[0]"; return $path if -r $path; } @@ -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; }