juli/OrcaSlicer
1
1
Fork 0
mirror of https://github.com/OrcaSlicer/OrcaSlicer.git synced 2026-05-19 19:33:47 +00:00
Code Issues Packages Projects Releases Wiki Activity

More integration of Slic3r::Point::XS

Browse Source
This commit is contained in:
Alessandro Ranellucci
2013-07-15 16:04:49 +02:00
parent 159a009f96
commit c9749ca3b3
9 changed files with 80 additions and 17 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
lib/Slic3r/Geometry.pm
View File

@@ -386,7 +386,10 @@ sub rotate_points {
sub move_points {
my ($shift, @points) = @_;
return map Slic3r::Point->new($shift->[X] + $_->[X], $shift->[Y] + $_->[Y]), @points;
return map {
my @p = @$_;
Slic3r::Point->new($shift->[X] + $p[X], $shift->[Y] + $p[Y]);
} @points;
}
sub move_points_3D {