r17457 - /scripts/qa/DebianQA/Svn.pm

tincho-guest at users.alioth.debian.org tincho-guest at users.alioth.debian.org
Sat Mar 15 02:51:19 UTC 2008


Author: tincho-guest
Date: Sat Mar 15 02:51:18 2008
New Revision: 17457

URL: http://svn.debian.org/wsvn/?sc=1&rev=17457
Log:
Properly recognise (undocumented) 'options=' tag in watch lines

Modified:
    scripts/qa/DebianQA/Svn.pm

Modified: scripts/qa/DebianQA/Svn.pm
URL: http://svn.debian.org/wsvn/scripts/qa/DebianQA/Svn.pm?rev=17457&op=diff
==============================================================================
--- scripts/qa/DebianQA/Svn.pm (original)
+++ scripts/qa/DebianQA/Svn.pm Sat Mar 15 02:51:18 2008
@@ -457,7 +457,8 @@
 
         # opts either contain no spaces, or is enclosed in double-quotes
         my $opts;
-        $opts = $1 if(s!^\s*opts="([^"]*)"\s+!! or s!^\s*opts=(\S*)\s+!!);
+        $opts = $1 if(s!^\s*opt(?:ion)?s="([^"]*)"\s+!!
+                or s!^\s*opt(?:ion)?s=(\S*)\s+!!);
         debug("Watch line options: $opts") if($opts);
 
         # several options are separated by comma and commas are not allowed




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