This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Small perlivp.PL updates
authorJohan Vromans <jvromans@squirrel.nl>
Wed, 25 Apr 2007 14:37:16 +0000 (16:37 +0200)
committerRafael Garcia-Suarez <rgarciasuarez@gmail.com>
Wed, 25 Apr 2007 15:31:29 +0000 (15:31 +0000)
Subject: Re: [Andreas J. Koenig] C3 MRO breaks Params::Util and Graph
Message-ID: <m2r6q8iq9v.fsf@phoenix.squirrel.nl>

p4raw-id: //depot/perl@31077

utils/perlivp.PL

index 276ba76..544efa3 100644 (file)
@@ -287,6 +287,12 @@ for (@modules) {
     $version = undef;
     @missing = ();
     @missing = $installed -> validate($_);
+
+    # .bs files are optional
+    @missing = grep { ! /\.bs$/ } @missing;
+    # man files are often compressed
+    @missing = grep { ! ( -s "$_.gz" || -s "$_.bz2" ) } @missing;
+
     if ($#missing >= 0) {
         print "# file",+($#missing == 0) ? '' : 's'," missing from installation:\n";
         print '# ',join(' ',@missing),"\n";