ExPolygon::XS->rotate()

This commit is contained in:
Alessandro Ranellucci 2013-07-11 18:55:51 +02:00
parent 1506907212
commit 87a5de193d
7 changed files with 86 additions and 19 deletions

View file

@ -329,10 +329,7 @@ sub scale {
sub rotate {
my $self = shift;
my ($angle, $center) = @_;
$center = Slic3r::Point::XS->new(@$center) if ref($center) ne 'Slic3r::Point::XS';
$_->rotate($angle, $center) for @{$self->expolygons};
$_->rotate(@_) for @{$self->expolygons};
$self;
}