Do not need to fail ttf font if SDL::Debug not set
Kartik Thakore [Mon, 17 Aug 2009 01:09:43 +0000 (21:09 -0400)]
lib/SDL/Tool/Font.pm

index b66267f..ab8958e 100644 (file)
@@ -77,7 +77,7 @@ sub DESTROY {
 sub print {
        my ($self,$surface,$x,$y,@text) = @_;
        croak "Tool::Font::print requires a SDL::Surface\n"
-               unless ($SDL::DEBUG && $surface->isa('SDL::Surface'));
+               unless ($surface->isa('SDL::Surface'));
        if ($$self{-font}->isa('SDL::Font')) {
                $$self{-font}->use();
                SDL::SFont::PutString( $$surface, $x, $y, join('',@text));