3D-printing/OrcaSlicer
1
0
Fork 0
mirror of https://github.com/SoftFever/OrcaSlicer.git synced 2025-11-02 20:51:23 -07:00
Code Issues Projects Releases Packages Wiki Activity Actions 4

Remove grep that is effectively repeated.

Browse source
This commit is contained in:
Mark Hindess 2012-05-31 18:15:40 +01:00
parent ea83c562c1
commit 2689f49ef8
1 changed files with 4 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

7
lib/Slic3r/TriangleMesh.pm
View file

@ -127,9 +127,10 @@ sub clean {
sub check_manifoldness { sub check_manifoldness {
my $self = shift; my $self = shift;
# look for edges not connected to exactly two facets # look for any edges not connected to exactly two facets
if (grep { @$_ != 2 } @{$self->edges_facets}) { my ($first_bad_edge_id) =
my ($first_bad_edge_id) = grep { @{ $self->edges_facets->[$_] } != 2 } 0..$#{$self->edges_facets}; grep { @{ $self->edges_facets->[$_] } != 2 } 0..$#{$self->edges_facets};
if (defined $first_bad_edge_id) {
warn sprintf "Warning: The input file is not manifold near edge %f-%f. " warn sprintf "Warning: The input file is not manifold near edge %f-%f. "
. "You might want to check the resulting G-code before printing.\n", . "You might want to check the resulting G-code before printing.\n",
@{$self->edges->[$first_bad_edge_id]}; @{$self->edges->[$first_bad_edge_id]};