Fixed regression with support material

This commit is contained in:
Alessandro Ranellucci 2012-04-30 23:36:49 +02:00
parent 4962d310bf
commit 54e1d934a7
2 changed files with 3 additions and 2 deletions
lib/Slic3r

View file

@ -237,7 +237,7 @@ sub export_gcode {
# generate support material # generate support material
if ($Slic3r::support_material) { if ($Slic3r::support_material) {
$status_cb->(85, "Generating support material"); $status_cb->(85, "Generating support material");
$_->generate_support_material for @{$self->objects}; $_->generate_support_material(print => $self) for @{$self->objects};
} }
# free memory (note that support material needs fill_surfaces) # free memory (note that support material needs fill_surfaces)

View file

@ -398,6 +398,7 @@ sub infill_every_layers {
sub generate_support_material { sub generate_support_material {
my $self = shift; my $self = shift;
my %params = @_;
# determine unsupported surfaces # determine unsupported surfaces
my %layers = (); my %layers = ();
@ -441,7 +442,7 @@ sub generate_support_material {
my @support_material_areas = map $_->offset_ex(scale 5), my @support_material_areas = map $_->offset_ex(scale 5),
@{union_ex([ map @$_, @unsupported_expolygons ])}; @{union_ex([ map @$_, @unsupported_expolygons ])};
my $fill = Slic3r::Fill->new(print => $self); my $fill = Slic3r::Fill->new(print => $params{print});
foreach my $angle (0, 90) { foreach my $angle (0, 90) {
my @patterns = (); my @patterns = ();
foreach my $expolygon (@support_material_areas) { foreach my $expolygon (@support_material_areas) {