t/porting/checkcase.t now passes no_chdir to File::Find::find().

This avoids the test occasionally aborting due to File::Find::find() calling
warn::warnif(), which in turn attempts to lazy load Carp, which doesn't work
for a test using relative paths in @INC with the current directory changed.

diff --git a/t/porting/checkcase.t b/t/porting/checkcase.t
index aa298b3..49f59e8 100644 (file)
--- a/t/porting/checkcase.t
+++ b/t/porting/checkcase.t
@@ -13,7 +13,7 @@ use File::Find;
 my %files;
 my $test_count = 0;
 
-find(sub {
+find({no_chdir => 1, wanted => sub {
           my $name = $File::Find::name;
           # Assumes that the path separator is exactly one character.
           $name =~ s/^\..//;
@@ -33,7 +33,7 @@ find(sub {
           }
 
           push @{$files{lc $name}}, $name;
-        }, '.');
+        }}, '.');
 
 foreach (sort values %files) {
     if (@$_ > 1) {