mirror of
https://github.com/SoftFever/OrcaSlicer.git
synced 2025-07-12 01:07:57 -06:00
14 lines
303 B
Perl
14 lines
303 B
Perl
package Slic3r::ExtrusionPath::Collection;
|
|
use strict;
|
|
use warnings;
|
|
|
|
sub cleanup {
|
|
my $self = shift;
|
|
|
|
# split paths at angles that are too acute to be printed as they will cause blobs
|
|
my @paths = map $_->split_at_acute_angles, @$self;
|
|
$self->clear;
|
|
$self->append(@paths);
|
|
}
|
|
|
|
1;
|