]> git.imager.perl.org - imager.git/blobdiff - t/300-transform/060-map.t
add new comparison method rgb_difference that resembles arithmetical difference per...
[imager.git] / t / 300-transform / 060-map.t
index d8d8a18f93ce7b07cf84340fa5a053c7eaee7e09..67a8744ee03baa7c754dc2a70e2c08ffe6f06ce3 100644 (file)
@@ -73,4 +73,14 @@ SKIP: {
   ok($out, "map done");
 }
 
+{ # CID 185300
+  # the check for whether a map() channel was used was incorrect
+  my @map1 = ( 0 .. 255 );
+  my $im = test_image;
+  my $cmp = test_image->copy;
+  ok($im->map(maps => [ \@map1, undef, \@map1 ]),
+     "map with gap in maps");
+  is_image($im, $cmp, "should be no changes");
+}
+
 done_testing();