Skip to content
Browse files

- t/t50basicoo.t no longer depends on the other tests to generate its

   input files.
   https://rt.cpan.org/Ticket/Display.html?id=9798
   Also, it wasn't testing pnm (pnm vs ppm mix-up)
  • Loading branch information...
1 parent 7581284 commit b6071a4312c70c5301cf5472869643b358091f09 Tony Cook committed Jun 30, 2010
Showing with 18 additions and 10 deletions.
  1. +5 −0 Changes
  2. +3 −0 MANIFEST
  3. +10 −10 t/t50basicoo.t
  4. BIN testimg/test.png
  5. BIN testimg/test.raw
  6. BIN testimg/test.tga
View
5 Changes
@@ -9,6 +9,11 @@ Bugs:
$data
https://rt.cpan.org/Ticket/Display.html?id=58761
+ - t/t50basicoo.t no longer depends on the other tests to generate its
+ input files.
+ https://rt.cpan.org/Ticket/Display.html?id=9798
+ Also, it wasn't testing pnm (pnm vs ppm mix-up)
+
Imager 0.75 - 20 Jun 2010
===========
View
3 MANIFEST
@@ -377,6 +377,9 @@ testimg/srgba.tif RGB with one alpha
testimg/srgba16.tif
testimg/srgba32.tif
testimg/srgbaa.tif RGB with 2 alpha
+testimg/test.png Standard test image as PNG
+testimg/test.raw Standard test image as RAW
+testimg/test.tga Standard test image as TGA
testimg/test_gimp_pal A simple GIMP palette file
testimg/tiffwarn.tif Generates a warning while being read
testimg/trimgdesc.gif
View
20 t/t50basicoo.t
@@ -14,7 +14,7 @@ my $buggy_giflib_file = "buggy_giflib.txt";
Imager::init("log"=>"testout/t50basicoo.log");
# single image/file types
-my @types = qw( jpeg png raw ppm gif tiff bmp tga );
+my @types = qw( jpeg png raw pnm gif tiff bmp tga );
# multiple image/file formats
my @mtypes = qw(tiff gif);
@@ -40,14 +40,14 @@ for(keys %hsh) { print "# $_\n"; }
my $img = Imager->new();
my %files;
-@files{@types} = ({ file => "testout/t101.jpg" },
- { file => "testout/t102.png" },
- { file => "testout/t103.raw", xsize=>150, ysize=>150, type=>'raw', interleave => 0},
- { file => "testout/t104.ppm" },
- { file => "testout/t105.gif" },
- { file => "testout/t106.tiff" },
- { file => "testout/t107_24bit.bmp" },
- { file => "testout/t108_24bit.tga" }, );
+@files{@types} = ({ file => "testimg/209_yonge.jpg" },
+ { file => "testimg/test.png" },
+ { file => "testimg/test.raw", xsize=>150, ysize=>150, type=>'raw', interleave => 0},
+ { file => "testimg/penguin-base.ppm" },
+ { file => "testimg/expected.gif" },
+ { file => "testimg/comp8.tif" },
+ { file => "testimg/winrgb24.bmp" },
+ { file => "testimg/test.tga" }, );
my %writeopts =
(
gif=> { make_colors=>'webmap', translate=>'closest', gifquant=>'gen',
@@ -176,7 +176,7 @@ for my $type (@types) {
my $wimg = Imager->new;
# if this doesn't work, we're so screwed up anyway
- ok($wimg->read(file=>"testout/t104.ppm"),
+ ok($wimg->read(file=>"testimg/penguin-base.ppm"),
"cannot read base file", $wimg);
# first to a file
View
BIN testimg/test.png
Sorry, something went wrong. Reload?
Sorry, we cannot display this file.
Sorry, this file is invalid so it cannot be displayed.
View
BIN testimg/test.raw
Binary file not shown.
View
BIN testimg/test.tga
Binary file not shown.

0 comments on commit b6071a4

Please sign in to comment.
Something went wrong with that request. Please try again.