Files
OrcaSlicer-bambulab/lib/Slic3r/ExtrusionLoop.pm
T

17 lines
339 B
Perl
Raw Normal View History

2011-09-25 23:15:45 +02:00
package Slic3r::ExtrusionLoop;
2013-07-15 16:21:09 +02:00
use strict;
use warnings;
2011-09-25 23:15:45 +02:00
sub split_at {
my $self = shift;
return Slic3r::ExtrusionPath->new(
polyline => $self->polygon->split_at(@_),
role => $self->role,
flow_spacing => $self->flow_spacing,
2013-07-15 16:21:09 +02:00
height => $self->height,
);
2011-09-25 23:15:45 +02:00
}
1;