2011-09-26 10:52:58 +02:00
|
|
|
package Slic3r::ExtrusionPath::Collection;
|
2013-07-18 19:09:07 +02:00
|
|
|
use strict;
|
|
|
|
|
use warnings;
|
2013-03-10 16:09:03 +01:00
|
|
|
|
2011-10-01 14:26:54 +02:00
|
|
|
sub cleanup {
|
|
|
|
|
my $self = shift;
|
|
|
|
|
|
|
|
|
|
# split paths at angles that are too acute to be printed as they will cause blobs
|
2013-07-18 22:29:12 +02:00
|
|
|
my @paths = map $_->split_at_acute_angles, @$self;
|
|
|
|
|
$self->clear;
|
|
|
|
|
$self->append(@paths);
|
2011-10-01 14:26:54 +02:00
|
|
|
}
|
|
|
|
|
|
2011-09-26 10:52:58 +02:00
|
|
|
1;
|