Skip the .init and .spec files.
authorDavid E. Wheeler <david@justatheory.com>
Tue, 16 Oct 2012 23:18:01 +0000 (16:18 -0700)
committerDavid E. Wheeler <david@justatheory.com>
Tue, 16 Oct 2012 23:18:01 +0000 (16:18 -0700)
They are not Perl. Maybe distribution-related stuff should go into another directory? `dist` perhaps?

t/01-basic.t

index 88d8bc19c3911780455813bef0c03de482fd74c2..3273b5c718768b71da578c6007bbf3d8ca042692 100644 (file)
@@ -18,7 +18,7 @@ my @test_files = grep { /\.t$/ } readdir $dh;
 closedir $dh or warn qq{Could not close the 't' directory: $!\n};
 
 opendir $dh, 'scripts' or die qq{Could not open the 'scripts' directory};
-my @script_files = grep { /^[a-z]/ and ! /\.rc$/ } readdir $dh;
+my @script_files = grep { /^[a-z]/ and ! /\.(?:rc|init|spec)$/ } readdir $dh;
 closedir $dh or warn qq{Could not close the 'scripts' directory: $!\n};
 
 plan tests => @important_files + @test_files + @script_files;