3DPrinting/PrusaSlicer-NonPlainar
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Fixes to pass all tests

Browse Source
This commit is contained in:
Alessandro Ranellucci 2013-08-26 16:25:42 +02:00
parent b6005327d6
commit 49040db9a3
3 changed files with 7 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
lib/Slic3r/ExPolygon.pm
View File

@ -149,7 +149,11 @@ sub medial_axis {
my $expolygon = $self->clone;
my @points = ();
foreach my $polygon (@$expolygon) {
Slic3r::Geometry::polyline_remove_short_segments($polygon, $width / 2);
{
my $p = $polygon->pp;
Slic3r::Geometry::polyline_remove_short_segments($p, $width / 2);
$polygon = Slic3r::Polygon->new(@$p);
}
# subdivide polygon segments so that we don't have anyone of them
# being longer than $width / 2

2
lib/Slic3r/Print.pm
View File

@ -674,7 +674,7 @@ sub make_brim {
# -0.5 because islands are not represented by their centerlines
# (first offset more, then step back - reverse order than the one used for
# perimeters because here we're offsetting outwards)
push @loops, @{offset2(\@islands, ($i + 0.5) * $flow->scaled_spacing, -1.0 * $flow->scaled_spacing, undef, JT_SQUARE)};
push @loops, @{offset2(\@islands, ($i + 0.5) * $flow->scaled_spacing, -1.0 * $flow->scaled_spacing, 100000, JT_SQUARE)};
}
@{$self->brim} = map Slic3r::ExtrusionLoop->new(

2
t/shells.t
View File

@ -1,4 +1,4 @@
use Test::More tests => 10;
use Test::More tests => 11;
use strict;
use warnings;