]> git.imager.perl.org - imager.git/blobdiff - t/t50basicoo.t
- in some cases it's possible for giflib/libungif to return color
[imager.git] / t / t50basicoo.t
index 5138196ca6536b2e448d8b4b1e69ee509b459cdb..ad45eaa9252e03708d7c23c433b7176d54093ab8 100644 (file)
@@ -355,7 +355,7 @@ sub ok {
   ++$test_num;
   if ($ok) {
     print "ok $test_num # $msg\n";
-    Imager::log_entry("ok $test_num # $msg\n", 0);
+    Imager::i_log_entry("ok $test_num # $msg\n", 0);
   }
   else {
     my $err;
@@ -364,7 +364,7 @@ sub ok {
     my $line = "not ok $test_num # line ".(caller)[2].": $msg";
     $line .= ": $err" if $err;
     print $line, "\n";
-    Imager::log_entry($line."\n", 0);
+    Imager::i_log_entry($line."\n", 0);
   }
   skip($why, $skipcount) if defined $why;
   $ok;