From 021db424163d574093ff658e9606a6f31942189d Mon Sep 17 00:00:00 2001 From: "Jerry D. Hedden" Date: Fri, 3 Aug 2007 05:55:10 -0400 Subject: [PATCH] installperl patch From: "Jerry D. Hedden" Message-Id: <1ff86f510708030655tdef838p859bb1ac7b05dcf9@mail.gmail.com> (Applied after splitting up the tests a little.) p4raw-id: //depot/perl@31682 --- installperl | 9 +++++---- 1 file changed, 5 insertions(+), 4 deletions(-) diff --git a/installperl b/installperl index dd61727..0f7e6eb 100755 --- a/installperl +++ b/installperl @@ -837,15 +837,16 @@ sub installlib { return if $dir =~ m{\bXS/(?:APItest|Typemap)\b}; return if $name =~ m{\b(?:APItest|Typemap)\.pm$}; # ignore the demo files - return if $dir =~ /\bdemos?\b/; + return if $dir =~ /\b(?:demos?|eg)\b/; # ignore READMEs, MANIFESTs, INSTALL docs, META.ymls and change logs. # Changes.e2x and README.e2x are needed by enc2xs. return if $name =~ m{^(?:README(?:\.\w+)?)$} && $name ne 'README.e2x'; - return if $name =~ m{^(?:MANIFEST|META\.yml|INSTALL)$}; - return if $name =~ m{^(?:TODO|BUGS|CREDITS)$}i; + return if $name =~ m{^(?:MANIFEST|META\.yml)$}; + return if $name =~ m{^(?:INSTALL|TODO|BUGS|CREDITS)$}i; return if $name =~ m{^change(?:s|log)(?:\.libnet)?$}i; - return if $name =~ m{^(?:SIGNATURE|PAUSE200\d\.pub)$}; # CPAN files + return if $name =~ m{^(?:SIGNATURE|PAUSE200\d\.pub)$}; # CPAN files + return if $name =~ m{^(?:NOTES|PATCHING)$}; # ExtUtils files # if using a shared perl library then ignore: # - static library files [of statically linked extensions]; -- 2.7.4