From c43ef450646bf03dee96419abb08599f6651e309 Mon Sep 17 00:00:00 2001
From: Alessandro Ranellucci <aar@cpan.org>
Date: Mon, 20 May 2013 09:56:55 +0200
Subject: [PATCH] Require the newest Math::Clipper and Boost::Geometry::Utils
 to avoid the huge memory leaks present in previous versions

---
 Build.PL                       | 4 ++--
 lib/Slic3r.pm                  | 2 +-
 lib/Slic3r/Geometry/Clipper.pm | 2 +-
 3 files changed, 4 insertions(+), 4 deletions(-)

diff --git a/Build.PL b/Build.PL
index d7d4d8e8a..522cf2284 100644
--- a/Build.PL
+++ b/Build.PL
@@ -7,12 +7,12 @@ my $build = Module::Build->new(
     dist_version    => '0.1',
     license         => 'perl',
     requires        => {
-        'Boost::Geometry::Utils'    => '0.08',
+        'Boost::Geometry::Utils'    => '0.12',
         'Encode::Locale'            => '0',
         'File::Basename'            => '0',
         'File::Spec'                => '0',
         'Getopt::Long'              => '0',
-        'Math::Clipper'             => '1.21',
+        'Math::Clipper'             => '1.22',
         'Math::ConvexHull::MonotoneChain' => '0.01',
         'Math::Geometry::Voronoi'   => '1.3',
         'Math::PlanePath'           => '53',
diff --git a/lib/Slic3r.pm b/lib/Slic3r.pm
index bd5215c4c..1338ce066 100644
--- a/lib/Slic3r.pm
+++ b/lib/Slic3r.pm
@@ -29,7 +29,7 @@ our $var = "$FindBin::Bin/var";
 
 use Encode;
 use Encode::Locale;
-use Boost::Geometry::Utils 0.08;
+use Boost::Geometry::Utils 0.12;
 use Moo 0.091009;
 
 use Slic3r::Config;
diff --git a/lib/Slic3r/Geometry/Clipper.pm b/lib/Slic3r/Geometry/Clipper.pm
index 498ccbcf7..e15f31a5a 100644
--- a/lib/Slic3r/Geometry/Clipper.pm
+++ b/lib/Slic3r/Geometry/Clipper.pm
@@ -8,7 +8,7 @@ our @EXPORT_OK = qw(safety_offset safety_offset_ex offset offset_ex collapse_ex
     diff_ex diff union_ex intersection_ex xor_ex PFT_EVENODD JT_MITER JT_ROUND
     JT_SQUARE is_counter_clockwise union_pt offset2 offset2_ex traverse_pt);
 
-use Math::Clipper 1.21 qw(:cliptypes :polyfilltypes :jointypes is_counter_clockwise area);
+use Math::Clipper 1.22 qw(:cliptypes :polyfilltypes :jointypes is_counter_clockwise area);
 use Slic3r::Geometry qw(scale);
 our $clipper = Math::Clipper->new;