Makefile and makefile only exist on case-sensitive file systems, so allow them.

diff --git a/t/porting/checkcase.t b/t/porting/checkcase.t
index 9516271..527af22 100644 (file)
--- a/t/porting/checkcase.t
+++ b/t/porting/checkcase.t
@@ -13,11 +13,13 @@ find(sub {
           my $name = $File::Find::name;
           # Assumes that the path separator is exactly one character.
           $name =~ s/^\.\..//;
+
+          # Special exemption for Makefile, makefile
+          return if $name =~ m!\A(?:x2p/)?[Mm]akefile\z!;
+
           push @{$files{lc $name}}, $name;
         }, '..');
 
-my $failed;
-
 foreach (values %files) {
     if (@$_ > 1) {
                print "not ok ".++$test_count. " - ". join(", ", @$_), "\n";