PrusaSlicer-NonPlainar/lib/Slic3r/ExtrusionLoop.pm

16 lines
295 B
Perl
Raw Normal View History

package Slic3r::ExtrusionLoop;
2013-07-15 14:21:09 +00:00
use strict;
use warnings;
sub split_at {
my $self = shift;
return Slic3r::ExtrusionPath->new(
polyline => $self->polygon->split_at(@_),
role => $self->role,
mm3_per_mm => $self->mm3_per_mm,
);
}
1;