missed some t/testtools.pl usage
authorTony Cook <tony@develop=help.com>
Tue, 29 Apr 2008 23:11:55 +0000 (23:11 +0000)
committerTony Cook <tony@develop=help.com>
Tue, 29 Apr 2008 23:11:55 +0000 (23:11 +0000)
ICO/t/t70icosing.t
ICO/t/t71icomult.t
ICO/t/t72cursing.t
ICO/t/t73curmult.t
MANIFEST

index 6a42ec8..8327e47 100644 (file)
@@ -2,10 +2,10 @@
 use strict;
 use Test::More tests => 1;
 use Imager;
 use strict;
 use Test::More tests => 1;
 use Imager;
-require '../t/testtools.pl';
+use Imager::Test qw(test_image);
 
 # checks that we load the ICO write handler automatically
 
 # checks that we load the ICO write handler automatically
-my $img = test_oo_img();
+my $img = test_image();
 ok($img->write(file => 'testout/icosing.ico'),
    "write ico with autoload")
   or print "# ",$img->errstr,"\n";
 ok($img->write(file => 'testout/icosing.ico'),
    "write ico with autoload")
   or print "# ",$img->errstr,"\n";
index fbb2f9e..f602c45 100644 (file)
@@ -2,10 +2,10 @@
 use strict;
 use Test::More tests => 1;
 use Imager;
 use strict;
 use Test::More tests => 1;
 use Imager;
-require '../t/testtools.pl';
+use Imager::Test qw(test_image);
 
 # checks that we load the ICO write handler automatically
 
 # checks that we load the ICO write handler automatically
-my $img = test_oo_img();
+my $img = test_image();
 ok(Imager->write_multi({ file => 'testout/icomult.ico' }, $img, $img),
    "write_multi ico with autoload")
   or print "# ",Imager->errstr,"\n";
 ok(Imager->write_multi({ file => 'testout/icomult.ico' }, $img, $img),
    "write_multi ico with autoload")
   or print "# ",Imager->errstr,"\n";
index d8632ab..8a17424 100644 (file)
@@ -2,10 +2,10 @@
 use strict;
 use Test::More tests => 1;
 use Imager;
 use strict;
 use Test::More tests => 1;
 use Imager;
-require '../t/testtools.pl';
+use Imager::Test qw(test_image);
 
 # checks that we load the CUR write handler automatically
 
 # checks that we load the CUR write handler automatically
-my $img = test_oo_img();
+my $img = test_image();
 ok($img->write(file => 'testout/cursing.cur'),
    "write cur with autoload")
   or print "# ",$img->errstr,"\n";
 ok($img->write(file => 'testout/cursing.cur'),
    "write cur with autoload")
   or print "# ",$img->errstr,"\n";
index b2ba49e..d0248bd 100644 (file)
@@ -2,10 +2,10 @@
 use strict;
 use Test::More tests => 1;
 use Imager;
 use strict;
 use Test::More tests => 1;
 use Imager;
-require '../t/testtools.pl';
+use Imager::Test qw(test_image);
 
 # checks that we load the CUR write handler automatically
 
 # checks that we load the CUR write handler automatically
-my $img = test_oo_img();
+my $img = test_image();
 ok(Imager->write_multi({ file => 'testout/icomult.cur' }, $img, $img),
    "write_multi cur with autoload")
   or print "# ",Imager->errstr,"\n";
 ok(Imager->write_multi({ file => 'testout/icomult.cur' }, $img, $img),
    "write_multi cur with autoload")
   or print "# ",Imager->errstr,"\n";
index 2d66ce9..1fb3d1d 100644 (file)
--- a/MANIFEST
+++ b/MANIFEST
@@ -273,7 +273,6 @@ t/t91pod.t          Test POD with Test::Pod
 t/t92samples.t
 t/t93podcover.t        POD Coverage tests
 t/t94kwalitee.t                Various "kwalitee" tests
 t/t92samples.t
 t/t93podcover.t        POD Coverage tests
 t/t94kwalitee.t                Various "kwalitee" tests
-t/testtools.pl
 t/tr18561.t            Regression tests
 t/tr18561b.t
 tags.c
 t/tr18561.t            Regression tests
 t/tr18561b.t
 tags.c