Fix a situation where extra perimeters prevented top shell to be fully propagated. #1387

This commit is contained in:
Alessandro Ranellucci 2013-08-13 09:45:33 +02:00
parent 36596bf569
commit 2b36778dc1
3 changed files with 11 additions and 4 deletions

View file

@ -416,7 +416,7 @@ sub prepare_fill_surfaces {
sub process_external_surfaces {
my $self = shift;
my $margin = scale 3; # TODO: ensure this is greater than the total thickness of the perimeters
my $margin = scale &Slic3r::EXTERNAL_INFILL_MARGIN;
my @bottom = ();
foreach my $surface (grep $_->surface_type == S_TYPE_BOTTOM, @{$self->fill_surfaces}) {