juli/OrcaSlicer
1
1
Fork 0
mirror of https://github.com/OrcaSlicer/OrcaSlicer.git synced 2026-05-19 19:33:47 +00:00
Code Issues Packages Projects Releases Wiki Activity

Disable retraction when moving over infill space. #29

Browse Source
This commit is contained in:
Alessandro Ranellucci
2011-11-21 12:37:12 +01:00
parent ed9b4e829c
commit d6ed9c6f34
2 changed files with 8 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
lib/Slic3r/Extruder.pm
View File

@@ -8,6 +8,7 @@ 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] } );
@@ -123,7 +124,8 @@ sub retract {
my $self = shift;
my %params = @_;
return "" unless $Slic3r::retract_length > 0
return "" unless $self->enable_retraction
&& $Slic3r::retract_length > 0
&& !$self->retracted;
# prepare moves