2011-10-15 09:36:05 +00:00
|
|
|
package Slic3r::Polygon;
|
|
|
|
|
use strict;
|
|
|
|
|
use warnings;
|
|
|
|
|
|
|
|
|
|
# a polygon is a closed polyline.
|
2011-12-30 18:59:51 +00:00
|
|
|
use parent 'Slic3r::Polyline';
|
2011-10-15 09:36:05 +00:00
|
|
|
|
2013-03-09 16:07:11 +00:00
|
|
|
sub grow {
|
|
|
|
|
my $self = shift;
|
|
|
|
|
return $self->split_at_first_point->grow(@_);
|
|
|
|
|
}
|
|
|
|
|
|
2011-10-15 09:36:05 +00:00
|
|
|
1;
|
