diff options
author | Alessandro Ranellucci <aar@cpan.org> | 2013-11-18 20:20:48 +0400 |
---|---|---|
committer | Alessandro Ranellucci <aar@cpan.org> | 2013-11-18 20:20:48 +0400 |
commit | 583fc767d851248bc0ece0f3fad548fdcd01d612 (patch) | |
tree | 60893c0e62302ec8649d7ba5b6b01900a45de2d3 | |
parent | abe56f96dabd658efe5332b910f9fa5ffb561aa9 (diff) |
Fix regression in Avoid Crossing Perimeters. #1531
-rw-r--r-- | lib/Slic3r/Print.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Slic3r/Print.pm b/lib/Slic3r/Print.pm index f178fdde0..a9c9ef333 100644 --- a/lib/Slic3r/Print.pm +++ b/lib/Slic3r/Print.pm @@ -790,7 +790,7 @@ sub write_gcode { $expolygon->translate(scale $shift[X], scale $shift[Y]); my @island = @{$expolygon->offset_ex(scale $distance_from_objects, 1, JT_SQUARE)}; foreach my $copy (@{ $self->objects->[$obj_idx]->copies }) { - push @islands, map $_->clone->translate(@$copy), @island; + push @islands, map { my $c = $_->clone; $c->translate(@$copy); $c } @island; } } } |