t/TEST - chomp manifest during read

If we chomp we return 2177 tests, if we don't we return 1808 tests.

1 files changed, 2 insertions, 1 deletions

diff --git a/t/TEST b/t/TEST
index 1dee698272..cf131ae3cc 100755
--- a/t/TEST
+++ b/t/TEST
@@ -410,8 +410,9 @@ sub _tests_from_manifest {
     my $mani = '../MANIFEST';
     if (open(MANI, $mani)) {
 	while (<MANI>) {
+	    chomp;
 	    my ($file)= split /\t/, $_;
-	    if ($file=~m!^((?:cpan|dist|ext)/(\S+)/+(?:[^/\s]+\.t|test\.pl)|lib/\S+?(?:\.t|test\.pl))\z!) {
+	    if ($file =~ m!^((?:cpan|dist|ext)/(\S+)/+(?:[^/\s]+\.t|test\.pl)|lib/\S+?(?:\.t|test\.pl))\z!) {
 		my $t = $1;
 		my $extension = $2;