Use dclone() in Point class too
This commit is contained in:
parent
72f77a3420
commit
be4eb3762f
@ -2,6 +2,8 @@ package Slic3r::Point;
|
|||||||
use strict;
|
use strict;
|
||||||
use warnings;
|
use warnings;
|
||||||
|
|
||||||
|
use Storable qw();
|
||||||
|
|
||||||
sub new {
|
sub new {
|
||||||
my $class = shift;
|
my $class = shift;
|
||||||
my $self;
|
my $self;
|
||||||
@ -19,8 +21,7 @@ sub new {
|
|||||||
}
|
}
|
||||||
|
|
||||||
sub clone {
|
sub clone {
|
||||||
my $self = shift;
|
Storable::dclone($_[0])
|
||||||
return (ref $self)->new(@$self);
|
|
||||||
}
|
}
|
||||||
|
|
||||||
sub coincides_with {
|
sub coincides_with {
|
||||||
|
Loading…
Reference in New Issue
Block a user