r7578 - /scripts/qa/versioncheck2.pl

dmn at users.alioth.debian.org dmn at users.alioth.debian.org
Fri Sep 14 18:17:54 UTC 2007


Author: dmn
Date: Fri Sep 14 18:17:54 2007
New Revision: 7578

URL: http://svn.debian.org/wsvn/?sc=1&rev=7578
Log:
OK, the pattern may be in the first watch item too

Modified:
    scripts/qa/versioncheck2.pl

Modified: scripts/qa/versioncheck2.pl
URL: http://svn.debian.org/wsvn/scripts/qa/versioncheck2.pl?rev=7578&op=diff
==============================================================================
--- scripts/qa/versioncheck2.pl (original)
+++ scripts/qa/versioncheck2.pl Fri Sep 14 18:17:54 2007
@@ -381,7 +381,8 @@
         my( $dir, $filter );
 
         # Either we have single URL/pattern
-        if( @items == 1 )
+        # or URL/pattern + extra
+        if( $items[0] =~ /\(/ )
         {
             # Since '+' is greedy, the second capture has no slashes
             ($dir, $filter) = $items[0] =~ m{^(.+)/(.+)$};




More information about the Pkg-perl-cvs-commits mailing list