Accept STL files with spaces at the end of vertex lines. #119

This commit is contained in:
Alessandro Ranellucci 2011-12-14 10:29:08 +01:00
parent cf33ec0a5c
commit ca5dfc05e7

View file

@ -45,7 +45,7 @@ sub read_file {
sub _read_ascii {
my ($fh, $facets) = @_;
my $point_re = qr/([^ ]+)\s+([^ ]+)\s+([^ ]+)$/;
my $point_re = qr/([^ ]+)\s+([^ ]+)\s+([^ ]+)\s*$/;
my $facet;
seek $fh, 0, 0;