X-Git-Url: https://git.pld-linux.org/?a=blobdiff_plain;f=perl-find-provides.patch;h=62dc5493c7bb371db68c2d4cae0b34983489c2f8;hb=9ca78239f10ab9528b8b8c58f5c85b00e8a280b8;hp=529ed4a0125d845ef1f19184baab39729d1987fb;hpb=68364e509aa23347ba147c9b100521890d2710ef;p=packages%2Fperl.git

diff --git a/perl-find-provides.patch b/perl-find-provides.patch
index 529ed4a..62dc549 100644
--- a/perl-find-provides.patch
+++ b/perl-find-provides.patch
@@ -13,7 +13,7 @@
 +
 --- perl5.005_03/find-perl.prov	Thu Jan  1 01:00:00 1970
 +++ perl5.005_03.new/find-perl.prov	Fri Oct 22 17:44:18 1999
-@@ -0,0 +1,112 @@
+@@ -0,0 +1,116 @@
 +#!FPPATH/perl
 +
 +# a simple script to print the proper name for perl libraries.
@@ -29,7 +29,9 @@
 +
 +if ("@ARGV") {
 +  foreach (@ARGV) {
-+    process_file($_);
++    if (! m=\.(so|gz|ph|pod)$=) {
++      process_file($_);
++    }
 +  }
 +} else {
 +
@@ -37,7 +39,9 @@
 +  # contents of the file.
 +
 +  foreach (<>) {
++    if (! m=\.(so|gz|ph|pod)$=) {
 +    process_file($_);
++    }
 +  }
 +}
 +