3D-printing/OrcaSlicer
1
0
Fork 0
mirror of https://github.com/SoftFever/OrcaSlicer.git synced 2025-10-30 20:21:12 -06:00
Code Issues Projects Releases Packages Wiki Activity Actions 5

Bugfix: arc compensation code was filling some small holes

Browse source
This commit is contained in:
Alessandro Ranellucci 2012-05-01 19:19:31 +02:00
parent d59d4a2c55
commit d164d13517
1 changed files with 3 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

3
lib/Slic3r/Layer.pm
View file

@ -198,7 +198,10 @@ sub make_perimeters {
next unless $area <= $Slic3r::small_perimeter_area; next unless $area <= $Slic3r::small_perimeter_area;
my $radius = sqrt($area / PI); my $radius = sqrt($area / PI);
my $new_radius = (scale($Slic3r::flow_width) + sqrt((scale($Slic3r::flow_width)**2) + (4*($radius**2)))) / 2; my $new_radius = (scale($Slic3r::flow_width) + sqrt((scale($Slic3r::flow_width)**2) + (4*($radius**2)))) / 2;
# holes are always turned to contours, so reverse point order before and after
$hole->reverse;
@$hole = map Slic3r::Point->new($_), @{ +($hole->offset(+ ($new_radius - $radius)))[0] }; @$hole = map Slic3r::Point->new($_), @{ +($hole->offset(+ ($new_radius - $radius)))[0] };
$hole->reverse;
} }
# create other offsets # create other offsets