mirror of
				https://github.com/SoftFever/OrcaSlicer.git
				synced 2025-11-02 20:51:23 -07:00 
			
		
		
		
	
		
			
				
	
	
		
			15 lines
		
	
	
	
		
			295 B
		
	
	
	
		
			Perl
		
	
	
	
	
	
			
		
		
	
	
			15 lines
		
	
	
	
		
			295 B
		
	
	
	
		
			Perl
		
	
	
	
	
	
package Slic3r::ExtrusionLoop;
 | 
						|
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;
 |