diff options
Diffstat (limited to 't/multi.t')
-rw-r--r-- | t/multi.t | 5 |
1 files changed, 2 insertions, 3 deletions
@@ -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'; } |