Be tolerant with STL files without the "normal" word

This commit is contained in:
Alessandro Ranellucci 2013-06-22 16:15:07 +02:00
parent 64a21276e3
commit 4774b0e910

View File

@ -55,7 +55,7 @@ sub _read_ascii {
seek $fh, 0, 0; seek $fh, 0, 0;
while (<$fh>) { while (<$fh>) {
if (!$facet) { if (!$facet) {
/^\s*facet\s+normal\s+/ or next; /^\s*facet/ or next; # be tolerant with malformed STL files not having the "normal" word
$facet = []; # ignore normal $facet = []; # ignore normal
} else { } else {
if (/^\s*endfacet/) { if (/^\s*endfacet/) {