From: Tony Cook <tony@develop-help.com>
Date: Sat, 12 Nov 2011 11:39:53 +0000 (+1100)
Subject: adjust the ICO over-size write failure tests for the new limits
X-Git-Tag: v0.87~10
X-Git-Url: http://git.imager.perl.org/imager.git/commitdiff_plain/aca931b17e5ffb672c97f9a564eb9b16d92c0284

adjust the ICO over-size write failure tests for the new limits
---

diff --git a/ICO/t/t60writefail.t b/ICO/t/t60writefail.t
index 1841b533..5bfd5517 100644
--- a/ICO/t/t60writefail.t
+++ b/ICO/t/t60writefail.t
@@ -10,7 +10,7 @@ use Imager ':handy';
 
 # image too big for format tests, for each entry point
 {
-  my $im = Imager->new(xsize => 256, ysize => 255);
+  my $im = Imager->new(xsize => 257, ysize => 256);
   my $data;
   ok(!$im->write(data => \$data, type=>'ico'),
      "image too large");
@@ -18,7 +18,7 @@ use Imager ':handy';
 }
 
 {
-  my $im = Imager->new(xsize => 256, ysize => 255);
+  my $im = Imager->new(xsize => 257, ysize => 256);
   my $data;
   ok(!Imager->write_multi({ data => \$data, type=>'ico' }, $im, $im),
      "image too large");
@@ -27,7 +27,7 @@ use Imager ':handy';
 }
 
 {
-  my $im = Imager->new(xsize => 256, ysize => 255);
+  my $im = Imager->new(xsize => 257, ysize => 256);
   my $data;
   ok(!$im->write(data => \$data, type=>'cur'),
      "image too large");
@@ -35,7 +35,7 @@ use Imager ':handy';
 }
 
 {
-  my $im = Imager->new(xsize => 256, ysize => 255);
+  my $im = Imager->new(xsize => 257, ysize => 256);
   my $data;
   ok(!Imager->write_multi({ data => \$data, type=>'cur' }, $im),
      "image too large");