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

Revert "Disable retraction when moving over infill space. #29"

Browse source 
This reverts commit d6ed9c6f34.
This commit is contained in:
Alessandro Ranellucci 2011-11-24 12:53:09 +01:00
parent 0ecfd68c10
commit 47d347e1b2
2 changed files with 3 additions and 8 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lib/Slic3r/Extruder.pm
View file

@ -8,7 +8,6 @@ has 'z' => (is => 'rw', default => sub {0} );
has 'flow_ratio' => (is => 'rw', default => sub {1});
has 'extrusion_distance' => (is => 'rw', default => sub {0} );
has 'enable_retraction' => (is => 'rw', default => sub {1} );
has 'retracted' => (is => 'rw', default => sub {1} ); # this spits out some plastic at start
has 'lifted' => (is => 'rw', default => sub {0} );
has 'last_pos' => (is => 'rw', default => sub { [0,0] } );
@ -124,8 +123,7 @@ sub retract {
my $self = shift;
my %params = @_;
return "" unless $self->enable_retraction
&& $Slic3r::retract_length > 0
return "" unless $Slic3r::retract_length > 0
&& !$self->retracted;
# prepare moves

7
lib/Slic3r/Print.pm
View file

@ -402,11 +402,8 @@ sub export_gcode {
# extrude fills
for my $fill (@{ $layer->fills }) {
for ($fill->shortest_path($extruder->last_pos)) {
printf $fh $extruder->extrude($_, 'fill');
$extruder->enable_retraction(0);
}
$extruder->enable_retraction(1);
printf $fh $extruder->extrude($_, 'fill')
for $fill->shortest_path($extruder->last_pos);
}
}