X-Git-Url: http://git.pld-linux.org/?p=packages%2Frpm.git;a=blobdiff_plain;f=rpm-perl_req-INC_dirs.patch;h=163ce710db176c77a38340aaa36541d1472e2575;hp=1dc63648b9e045d79d9b832fd1fea9b7898d8533;hb=325a532219bff8dddbbc8166fde61db76084d152;hpb=7e536e152eea6d8df1fbb0b4ad54a60aca352da2

diff --git a/rpm-perl_req-INC_dirs.patch b/rpm-perl_req-INC_dirs.patch
index 1dc6364..163ce71 100644
--- a/rpm-perl_req-INC_dirs.patch
+++ b/rpm-perl_req-INC_dirs.patch
@@ -16,9 +16,10 @@
 +
  foreach ( @ARGV ? @ARGV : <> ) {
 -	chomp;
+-    if (m=/usr/(sbin|bin|lib|share|X11R6/(lib|bin))/=) {
 +    chomp;
 +    $inc{$1}++ if m#($inc)/#;  # can't anchor on ^
-     if (m=/usr/(sbin|bin|lib|share|X11R6/(lib|bin))/=) {
++    if (m=/usr/(sbin|bin|lib|lib64|share|X11R6/(lib|lib64|bin))/=) {
        if (! m=(/(doc|man|info|usr/src)/|\.(so|ph|h|html|pod)$)=) {
          process_file($_) if -f;
 @@ -53,8 +64,9 @@
@@ -28,7 +29,7 @@
 +print "$_\n" for sort grep $inc{$_}, keys %inc;
  
 -foreach $module (sort keys %require) {
-+foreach my $module (sort keys %require) {
++foreach my $module (sort grep length, keys %require) {
    if (length($require{$module}) == 0) {
       if ($module =~ /^[0-9._]+$/) {
         print "perl-base >= $module\n";