ok($img1, "drawing bar chart");
$img1->write(file=>'testout/t14_bar.ppm') or die "Can't save img1: ".$img1->errstr."\n";
- cmpimg($img1, 'testimg/t14_bar.ppm', 1);
+ cmpimg($img1, 'testimg/t14_bar.ppm', 80_000);
}
{ # alternative interfaces
ok($img1, "drawing bar chart");
$img1->write(file=>'testout/t14_bar2.ppm') or die "Can't save img1: ".$img1->errstr."\n";
- cmpimg($img1, 'testimg/t14_bar.ppm', 1);
+ cmpimg($img1, 'testimg/t14_bar.ppm', 80_000);
}
unless (is(@warned, 0, "should be no warnings")) {