Fixed regression with support material
This commit is contained in:
parent
4962d310bf
commit
54e1d934a7
2 changed files with 3 additions and 2 deletions
|
@ -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)
|
||||||
|
|
|
@ -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) {
|
||||||
|
|
Loading…
Add table
Reference in a new issue