]> git.imager.perl.org - imager.git/blobdiff - t/x11rubthru.t
Merge the I/O buffering branch
[imager.git] / t / x11rubthru.t
index 5f7836da0fef3c21e7fa42ffdab484998eab6a0b..f71ad6606f1fdc65e93ed5c73bcea913e7c930f0 100644 (file)
@@ -4,9 +4,11 @@ use Imager;
 use Imager::Test qw(is_image);
 use Test::More;
 
-Imager::i_has_format("tiff")
+$Imager::formats{"tiff"}
   or plan skip_all => "no tiff support";
 
+-d "testout" or mkdir "testout";
+
 plan tests => 2;
 
 my $dest = Imager->new(xsize => 100, ysize => 100, channels => 4);