SOURCES: rpm-perl_req-use_base.patch - avoid tripping old dep generators wi...

[radek]

Author: radek                        Date: Sun Oct 26 09:57:51 2008 GMT
Module: SOURCES                       Tag: HEAD
---- Log message:
- avoid tripping old dep generators with R: perl(\s+)

---- Files affected:
SOURCES:
   rpm-perl_req-use_base.patch (1.5 -> 1.6) 

---- Diffs:

================================================================
Index: SOURCES/rpm-perl_req-use_base.patch
diff -u SOURCES/rpm-perl_req-use_base.patch:1.5 SOURCES/rpm-perl_req-use_base.patch:1.6
--- SOURCES/rpm-perl_req-use_base.patch:1.5	Sat Sep 20 12:50:08 2008
+++ SOURCES/rpm-perl_req-use_base.patch	Sun Oct 26 10:57:45 2008
@@ -1,14 +1,13 @@
 --- rpm-5.1.4/scripts/perl.req	2008-08-20 21:27:09.929116479 +0200
-+++ rpm-5.1.4/scripts/perl.req	2008-08-20 21:27:25.919114230 +0200
-@@ -196,7 +196,29 @@
++++ rpm-5.1.4/scripts/perl.req	2008-10-26 10:48:31.529709016 +0100
+@@ -196,7 +196,28 @@
        }
      }
  
 -    if ( 
 +    # handle "use base qw/ foo::bar baz::blah /;" and variations
 +    if (
-+        m/^ \s*
-+           use \s+ base
++        m/^ \s* use \s+ base
 +           (?:  \s+ q[wq]? \s* ( [!@#\$%^&*'"\/+=`~,.?-] ) \s* ( [\w:]+? (?: \s+[\w:]+? )*? ) \s* \1
 +               |
 +                \s* ( ["'] ) ( [\w:]+? ) \3
================================================================

---- CVS-web:
    http://cvs.pld-linux.org/cgi-bin/cvsweb.cgi/SOURCES/rpm-perl_req-use_base.patch?r1=1.5&r2=1.6&f=u