missed some t/testtools.pl usage
[imager.git] / ICO / t / t70icosing.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 ICO write handler automatically
8 my $img = test_image();
9 ok($img->write(file => 'testout/icosing.ico'),
10    "write ico with autoload")
11   or print "# ",$img->errstr,"\n";