mirror of
				https://github.com/SoftFever/OrcaSlicer.git
				synced 2025-10-31 04:31:15 -06:00 
			
		
		
		
	
		
			
				
	
	
		
			13 lines
		
	
	
		
			No EOL
		
	
	
		
			206 B
		
	
	
	
		
			Perl
		
	
	
	
	
	
			
		
		
	
	
			13 lines
		
	
	
		
			No EOL
		
	
	
		
			206 B
		
	
	
	
		
			Perl
		
	
	
	
	
	
| package Slic3r::Polygon;
 | |
| use strict;
 | |
| use warnings;
 | |
| 
 | |
| # a polygon is a closed polyline.
 | |
| use parent 'Slic3r::Polyline';
 | |
| 
 | |
| sub grow {
 | |
|     my $self = shift;
 | |
|     return $self->split_at_first_point->grow(@_);
 | |
| }
 | |
| 
 | |
| 1; | 
