In perl.git, the branch blead has been updated

<http://perl5.git.perl.org/perl.git/commitdiff/e4ed29fbb903ac6b15b0ec4a5a6696aaa73401f2?hp=aa2f79cfd781fa0bd9e0fcec607dd31150743daa>

- Log -----------------------------------------------------------------
commit e4ed29fbb903ac6b15b0ec4a5a6696aaa73401f2
Author: David Golden <dagol...@cpan.org>
Date:   Wed Nov 17 15:03:18 2010 -0500

    Don't install unnecessary unicore files
    
    Many of the files in lib/unicore are no longer needed
    after testing.  This patches installperl to skip those
    files, cutting down the installed size of unicore
    from about 17M to about 7M.
-----------------------------------------------------------------------

Summary of changes:
 installperl |   13 +++++++++++++
 1 files changed, 13 insertions(+), 0 deletions(-)

diff --git a/installperl b/installperl
index c6d358b..d1eafe6 100755
--- a/installperl
+++ b/installperl
@@ -716,6 +716,19 @@ sub installlib {
     return if $name =~ m{\b(?:APItest|Typemap)\.pm$};
     # ignore the demo files
     return if $dir =~ /\b(?:demos?|eg)\b/;
+    # ignore unneeded unicore files
+    if ( $dir =~ /^unicore/ ) {
+      if ( $name =~ /\.txt\z/ ) {
+        # We can ignore most, but not all .txt files
+        return unless $name =~ 
/\A(?:UnicodeData|Blocks|Scripts|CompositionExclusions|CaseFolding|SpecialCasing|NamedSequences)\.txt\z/;
+      }
+      else {
+        # TestProp only needed during testing
+        return if $name =~ /\ATestProp.pl\z/;
+        # we need version and *.pl files and can skip the rest
+        return unless $name =~ /\A(?:version|\w+\.pl)\z/;
+      }
+    }
 
     # ignore READMEs, MANIFESTs, INSTALL docs, META.ymls and change logs.
     # Changes.e2x and README.e2x are needed by enc2xs.

--
Perl5 Master Repository

Reply via email to