Add the coordinates of the first non-manifold edge to the warning message. #292
This commit is contained in:
parent
d791315b4a
commit
f380b1007d
1 changed files with 5 additions and 2 deletions
|
@ -108,9 +108,12 @@ sub clean {
|
||||||
sub check_manifoldness {
|
sub check_manifoldness {
|
||||||
my $self = shift;
|
my $self = shift;
|
||||||
|
|
||||||
|
# look for edges not connected to exactly two facets
|
||||||
if (grep { @$_ != 2 } @{$self->edges_facets}) {
|
if (grep { @$_ != 2 } @{$self->edges_facets}) {
|
||||||
warn "Warning: The input file is not manifold. You might want to check the "
|
my ($first_bad_edge_id) = grep { @{ $self->edges_facets->[$_] } != 2 } 0..$#{$self->edges_facets};
|
||||||
. "resulting gcode before printing.\n";
|
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",
|
||||||
|
@{$self->edges->[$first_bad_edge_id]};
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
Loading…
Reference in a new issue