From: Jerry D. Hedden Date: Fri, 3 Aug 2007 09:55:10 +0000 (-0400) Subject: installperl patch X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=021db424163d574093ff658e9606a6f31942189d;p=p5sagit%2Fp5-mst-13.2.git 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 --- 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];