Thin walls. #24

2011-12-30 17:17:37 +01:00
parent 62ee79f0c9
commit 1c7564e4a4
12 changed files with 203 additions and 12 deletions
--- a/lib/Slic3r/Point.pm
+++ b/lib/Slic3r/Point.pm
@@ -20,6 +20,11 @@ sub new {
    return $self;
 }

+sub clone {
+    my $self = shift;
+    return (ref $self)->new(@$self);
+}
+
 sub cast {
    my $class = shift;
    if (ref $_[0] eq 'Slic3r::Point') {