SOURCES: rpm-perl_req-use_base.patch - be more strict in matching module na...
radek
radek at pld-linux.org
Sat Sep 20 12:50:14 CEST 2008
Author: radek Date: Sat Sep 20 10:50:13 2008 GMT
Module: SOURCES Tag: HEAD
---- Log message:
- be more strict in matching module names (fixes perl-Exception-Class)
---- Files affected:
SOURCES:
rpm-perl_req-use_base.patch (1.4 -> 1.5)
---- Diffs:
================================================================
Index: SOURCES/rpm-perl_req-use_base.patch
diff -u SOURCES/rpm-perl_req-use_base.patch:1.4 SOURCES/rpm-perl_req-use_base.patch:1.5
--- SOURCES/rpm-perl_req-use_base.patch:1.4 Tue Aug 26 20:36:14 2008
+++ SOURCES/rpm-perl_req-use_base.patch Sat Sep 20 12:50:08 2008
@@ -9,12 +9,12 @@
+ if (
+ m/^ \s*
+ use \s+ base
-+ (?: \s+ q[wq]? \s* ( [!@#\$%^&*'"\/+=`~,.?-] ) \s* ( \S+? (?: \s+\S+? )*? ) \s* \1
++ (?: \s+ q[wq]? \s* ( [!@#\$%^&*'"\/+=`~,.?-] ) \s* ( [\w:]+? (?: \s+[\w:]+? )*? ) \s* \1
+ |
-+ \s* ( ["'] ) ( \S+? ) \3
++ \s* ( ["'] ) ( [\w:]+? ) \3
+ |
+ # qw[], qw(), qw<>, qw{} are handled here; lax, but who gives
-+ \s+ q[wq]? \s* [\[({<] \s* ( \S+? (?: \s+\S+? )*? ) \s* [\])}>]
++ \s+ q[wq]? \s* [\[({<] \s* ( [\w:]+? (?: \s+[\w:]+? )*? ) \s* [\])}>]
+ )
+ \s* ;
+ /x
================================================================
---- CVS-web:
http://cvs.pld-linux.org/cgi-bin/cvsweb.cgi/SOURCES/rpm-perl_req-use_base.patch?r1=1.4&r2=1.5&f=u
More information about the pld-cvs-commit
mailing list