Merge pull request #4 from moritz/remove-readability-check-rt-99055 Remove file readability check, as requested in [cpan #99055]
Christian Renz
8 years ago
1 changed file(s) with
1 addition(s)
and
1 deletion(s)
.
Raw diff
Collapse all
Expand all
+1
-1
Find.pm
less
more
164
164
return;
165
165
}
166
166
167
return unless /\.pm$/ && -r;
167
return unless /\.pm$/;
168
168
169
169
$name =~ s|\.pm$||;
170
170
$name = join('::', File::Spec->splitdir($name));