]> git.imager.perl.org - imager.git/commitdiff
fix the prototype for Imager::Test::is_imaged
authorTony Cook <tony@develop-help.com>
Sat, 14 Apr 2012 02:51:47 +0000 (12:51 +1000)
committerTony Cook <tony@develop-help.com>
Sat, 14 Apr 2012 02:52:48 +0000 (12:52 +1000)
lib/Imager/Test.pm

index ec2f587fafe3570453d88940730d50db841c82a5..fe3391ff3bc64e2f95b02450f95a2ece8e12e525 100644 (file)
@@ -499,7 +499,7 @@ sub is_image($$$) {
   return is_image_similar($left, $right, 0, $comment);
 }
 
   return is_image_similar($left, $right, 0, $comment);
 }
 
-sub is_imaged($$$) {
+sub is_imaged($$$;$) {
   my $epsilon = Imager::i_img_epsilonf();
   if (@_ > 3) {
     ($epsilon) = splice @_, 2, 1;
   my $epsilon = Imager::i_img_epsilonf();
   if (@_ > 3) {
     ($epsilon) = splice @_, 2, 1;