3D-printing/OrcaSlicer
1
0
Fork 0
mirror of https://github.com/SoftFever/OrcaSlicer.git synced 2025-07-12 09:17:52 -06:00
Code Issues Projects Releases Packages Wiki Activity Actions 2

Export STL

Browse source
This commit is contained in:
Alessandro Ranellucci 2012-04-30 17:10:54 +02:00
parent d03925a18d
commit 2a067ae41f
2 changed files with 52 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

10
lib/Slic3r/TriangleMesh.pm
View file

@ -58,6 +58,14 @@ sub BUILD {
}
}
sub clone {
my $self = shift;
return (ref $self)->new(
vertices => [ map [ @$_ ], @{$self->vertices} ],
facets => [ map [ @$_ ], @{$self->facets} ],
);
}
sub _facet_edges {
my $self = shift;
my ($facet_id) = @_;
@ -284,7 +292,7 @@ sub move {
# transform vertex coordinates
foreach my $vertex (@{$self->vertices}) {
$vertex->[$_] += $shift[$_] for X,Y,Z;
$vertex->[$_] += $shift[$_] || 0 for X,Y,Z;
}
}