missed some t/testtools.pl usage
[imager.git] / ICO / t / t73curmult.t
1 #!perl -w
2 use strict;
3 use Test::More tests => 1;
4 use Imager;
5 use Imager::Test qw(test_image);
6
7 # checks that we load the CUR write handler automatically
8 my $img = test_image();
9 ok(Imager->write_multi({ file => 'testout/icomult.cur' }, $img, $img),
10    "write_multi cur with autoload")
11   or print "# ",Imager->errstr,"\n";