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

[tincho-guest at users.alioth.debian.org]

Author: tincho-guest
Date: Sun Dec 23 09:01:01 2007
New Revision: 11494

URL: http://svn.debian.org/wsvn/?sc=1&rev=11494
Log:
Missing path for dist/ urls

Modified:
    scripts/qa/DebianQA/Watch.pm

Modified: scripts/qa/DebianQA/Watch.pm
URL: http://svn.debian.org/wsvn/scripts/qa/DebianQA/Watch.pm?rev=11494&op=diff
==============================================================================
--- scripts/qa/DebianQA/Watch.pm (original)
+++ scripts/qa/DebianQA/Watch.pm Sun Dec 23 09:01:01 2007
@@ -294,7 +294,11 @@
         }
         push @res, {
             upstream_version => $cpan_ver,
-            upstream_url => ($type eq "dist" ? $base : $origdir) . "/$_"
+            upstream_url => (
+                $type eq "dist" ?
+                "$base/CPAN/authors/id" :
+                $origdir
+            ) . "/$_"
         };
     }
     return ("NotFound") unless(@res);