Skip to content

Commit f3b21dd

Browse files
committed
override MM_Any to block the README.pod warning
1 parent d840630 commit f3b21dd

File tree

1 file changed

+17
-0
lines changed

1 file changed

+17
-0
lines changed

Makefile.PL

Lines changed: 17 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -35,6 +35,23 @@ Perl.
3535
3636
=cut
3737

38+
BEGIN {
39+
use ExtUtils::MM_Any;
40+
no warnings qw(redefine);
41+
42+
# get rid of the warning about README.pod, because I'm using it.
43+
# It's also in INSTALL.SKIP
44+
sub ExtUtils::MM_Any::libscan {
45+
my($self,$path) = @_;
46+
47+
my($dirs,$file) = ($self->splitpath($path))[1,2];
48+
return '' if grep /^(?:RCS|CVS|SCCS|\.svn|_darcs)$/,
49+
$self->splitdir($dirs), $file;
50+
51+
return $path;
52+
}
53+
}
54+
3855
use File::Spec::Functions qw(catfile);
3956

4057
my $module = __PACKAGE__;

0 commit comments

Comments
 (0)