summaryrefslogtreecommitdiff
path: root/t/porting
diff options
context:
space:
mode:
authorNicholas Clark <nick@ccl4.org>2009-10-07 20:19:21 +0100
committerNicholas Clark <nick@ccl4.org>2009-10-07 20:19:21 +0100
commit0a38ae18eab66ea249670cf95ae35df5a620e968 (patch)
treec273f38a681256e6350b132af2ca3169a11b6611 /t/porting
parent85ee66ebc80e705da4ab79eab4c148a1fe932657 (diff)
downloadperl-0a38ae18eab66ea249670cf95ae35df5a620e968.tar.gz
Makefile and makefile only exist on case-sensitive file systems, so allow them.
Diffstat (limited to 't/porting')
-rw-r--r--t/porting/checkcase.t6
1 files changed, 4 insertions, 2 deletions
diff --git a/t/porting/checkcase.t b/t/porting/checkcase.t
index 9516271397..527af222f0 100644
--- 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";