3D-printing/OrcaSlicer
1
0
Fork 0
mirror of https://github.com/SoftFever/OrcaSlicer.git synced 2025-10-30 12:11:15 -06:00
Code Issues Projects Releases Packages Wiki Activity Actions 5

Partial GUI compatibility with XS data

Browse source
This commit is contained in:
Alessandro Ranellucci 2013-07-07 18:43:04 +02:00
parent 8380ca812b
commit 5409c27852
4 changed files with 11 additions and 14 deletions
Download patch file Download diff file Expand all files Collapse all files

7
lib/Slic3r/ExPolygon.pm
View file

@ -35,11 +35,6 @@ sub clone {
# no-op for legacy with ::XS
sub arrayref { $_[0] }
sub threadsafe_clone {
my $self = shift;
return (ref $self)->new(map $_->threadsafe_clone, @$self);
}
sub contour {
my $self = shift;
return $self->[0];
@ -314,7 +309,7 @@ has 'expolygons' => (is => 'ro', default => sub { [] });
sub clone {
my $self = shift;
return (ref $self)->new(
expolygons => [ map $_->threadsafe_clone, @{$self->expolygons} ],
expolygons => [ map $_->clone, @{$self->expolygons} ],
);
}