increase tolerances on images with filled circles drawn on them

diff --git a/Changes b/Changes
index 136be67226b7ed00fcaad7096765fd94445e5fed..3987f28c44901924a0506efd79fd6edb6f8c1a92 100644 (file)
--- a/Changes
+++ b/Changes
@@ -1,5 +1,9 @@
 Revision history for Perl extension Imager::Graph.
 
+ - increase tolerances on images with filled circles drawn on them to
+   account for the circle drawing change in Imager 1.002.
+   https://rt.cpan.org/Ticket/Display.html?id=103328
+
 Imager-Graph 0.11 - 30 Jun 2014
 =================
 

diff --git a/t/t30many_points.t b/t/t30many_points.t
index 950a7452615459a85ecef5ca1535d5a2535fa2bd..27b753f4e7438f53a4d1318d581d6d6864a96247 100644 (file)
--- a/t/t30many_points.t
+++ b/t/t30many_points.t
@@ -42,7 +42,7 @@ my $img1 = $line->draw();
 ok($img1, "drawing line chart");
 
 $img1->write(file=>'testout/t30_points.ppm') or die "Can't save img1: ".$img1->errstr."\n";
-cmpimg($img1, 'testimg/t30_points.png', 40_000);
+cmpimg($img1, 'testimg/t30_points.png', 200_000);
 
 unless (is(@warned, 0, "should be no warnings")) {
   diag($_) for @warned;

diff --git a/t/t32series_labels.t b/t/t32series_labels.t
index 30b1e47fe161aaa1771b72a7930720833d31675b..7aca1b0a709f8e573f14d3cf8bf1f820df929881 100644 (file)
--- a/t/t32series_labels.t
+++ b/t/t32series_labels.t
@@ -44,7 +44,7 @@ my $img1 = $line->draw();
 ok($img1, "drawing line chart");
 
 $img1->write(file=>'testout/t32_series.ppm') or die "Can't save img1: ".$img1->errstr."\n";
-cmpimg($img1, 'testimg/t32_series.png', 80_000);
+cmpimg($img1, 'testimg/t32_series.png', 200_000);
 
 unless (is(@warned, 0, "should be no warnings")) {
   diag($_) for @warned;