Remove unnecessary retractions

This commit is contained in:
Alessandro Ranellucci 2012-10-24 19:38:18 +02:00
parent 44016b38c5
commit 355031fe2f

View file

@ -745,10 +745,13 @@ sub write_gcode {
my $region = $self->regions->[$region_id];
# extrude perimeters
if (@{ $layerm->perimeters }) {
$gcode .= $gcodegen->set_extruder($region->extruders->{perimeter});
$gcode .= $gcodegen->extrude($_, 'perimeter') for @{ $layerm->perimeters };
}
# extrude fills
if (@{ $layerm->fills }) {
$gcode .= $gcodegen->set_extruder($region->extruders->{infill});
$gcode .= $gcodegen->set_acceleration($Slic3r::Config->infill_acceleration);
for my $fill (@{ $layerm->fills }) {
@ -760,6 +763,7 @@ sub write_gcode {
}
}
}
}
# extrude support material
if ($layer->support_fills) {