r9185 - /scripts/qa/DebianQA/Watch.pm

tincho-guest at users.alioth.debian.org tincho-guest at users.alioth.debian.org
Sat Nov 10 11:06:28 UTC 2007


Author: tincho-guest
Date: Sat Nov 10 11:06:28 2007
New Revision: 9185

URL: http://svn.debian.org/wsvn/?sc=1&rev=9185
Log:
Fix to allow processing of URIs without path (i.e. http://google.com without a
slash at the end)

Modified:
    scripts/qa/DebianQA/Watch.pm

Modified: scripts/qa/DebianQA/Watch.pm
URL: http://svn.debian.org/wsvn/scripts/qa/DebianQA/Watch.pm?rev=9185&op=diff
==============================================================================
--- scripts/qa/DebianQA/Watch.pm (original)
+++ scripts/qa/DebianQA/Watch.pm Sat Nov 10 11:06:28 2007
@@ -130,6 +130,8 @@
     info("Processing watch line $wline");
 
     $wline =~ s{^http://sf\.net/(\S+)}{http://qa.debian.org/watch/sf.php/$1};
+    # Fix URIs with no path
+    $wline =~ s{^(\w+://[^\s/]+)(\s|$)}{$1/$2};
     unless($wline =~ m{^(?:(?:https?|ftp)://\S+?)/}) {
         warn("Invalid watch line: $wline");
         return("Invalid");




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