Do hole perimeters in ccw direction too
This commit is contained in:
parent
b6bffacb9d
commit
f2e1fe5241
@ -115,6 +115,7 @@ sub make_perimeter {
|
|||||||
}
|
}
|
||||||
|
|
||||||
foreach my $hole (@holes) {
|
foreach my $hole (@holes) {
|
||||||
|
$hole->reverse;
|
||||||
push @{ $layer->perimeters }, Slic3r::ExtrusionLoop->new(polygon => $hole, role => 'perimeter');
|
push @{ $layer->perimeters }, Slic3r::ExtrusionLoop->new(polygon => $hole, role => 'perimeter');
|
||||||
}
|
}
|
||||||
|
|
||||||
|
@ -30,6 +30,11 @@ sub clone {
|
|||||||
return (ref $self)->new(map $_->clone, @$self);
|
return (ref $self)->new(map $_->clone, @$self);
|
||||||
}
|
}
|
||||||
|
|
||||||
|
sub reverse {
|
||||||
|
my $self = shift;
|
||||||
|
@$self = reverse @$self;
|
||||||
|
}
|
||||||
|
|
||||||
sub lines {
|
sub lines {
|
||||||
my $self = shift;
|
my $self = shift;
|
||||||
return map Slic3r::Line->new($_), polygon_lines($self);
|
return map Slic3r::Line->new($_), polygon_lines($self);
|
||||||
|
Loading…
Reference in New Issue
Block a user