juli/OrcaSlicer
1
1
Fork 0
mirror of https://github.com/OrcaSlicer/OrcaSlicer.git synced 2026-05-18 11:02:08 +00:00
Code Issues Packages Projects Releases Wiki Activity

Ported nearest_point() and nearest_point_index()

Browse Source
This commit is contained in:
Alessandro Ranellucci
2013-08-27 00:52:20 +02:00
parent f1e9216c70
commit b11b595c97
18 changed files with 79 additions and 69 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
lib/Slic3r/Fill/Concentric.pm
View File

@@ -3,7 +3,7 @@ use Moo;
extends 'Slic3r::Fill::Base';
use Slic3r::Geometry qw(scale unscale X nearest_point_index);
use Slic3r::Geometry qw(scale unscale X);
use Slic3r::Geometry::Clipper qw(offset offset2 union_pt traverse_pt PFT_EVENODD);
sub fill_surface {
@@ -43,7 +43,7 @@ sub fill_surface {
my @paths = ();
my $last_pos = [0,0];
foreach my $loop (@loops) {
push @paths, $loop->split_at_index(nearest_point_index($last_pos, $loop));
push @paths, $loop->split_at_index($last_pos->nearest_point_index($loop));
$last_pos = $paths[-1][-1];
}