Incomplete work for XS-based convex_hull

1 files changed, 2 insertions, 3 deletions

diff --git a/t/multi.t b/t/multi.t
index 4524891c7..0071363d9 100644
--- a/t/multi.t
+++ b/t/multi.t
@@ -8,9 +8,8 @@ BEGIN {
 }
 
 use List::Util qw(first);
-use Math::ConvexHull::MonotoneChain qw(convex_hull);
 use Slic3r;
-use Slic3r::Geometry qw(scale);
+use Slic3r::Geometry qw(scale convex_hull);
 use Slic3r::Test;
 
 {
@@ -54,7 +53,7 @@ use Slic3r::Test;
             $point->translate(map scale($_), @{ $config->extruder_offset->[$tool] });
         }
     });
-    my $convex_hull = Slic3r::Polygon->new(@{convex_hull([ map $_->pp, @extrusion_points ])});
+    my $convex_hull = convex_hull(\@extrusion_points);
     ok !(first { $convex_hull->contains_point($_) } @toolchange_points), 'all toolchanges happen outside skirt';
 }