r17711 - in /scripts/qa: DebianQA/Watch.pm templates/by_category

tincho-guest at users.alioth.debian.org tincho-guest at users.alioth.debian.org
Mon Mar 17 02:45:25 UTC 2008


Author: tincho-guest
Date: Mon Mar 17 02:45:24 2008
New Revision: 17711

URL: http://svn.debian.org/wsvn/?sc=1&rev=17711
Log:
Add code to save and show upstream directory link (to ease fixing version problems)

Modified:
    scripts/qa/DebianQA/Watch.pm
    scripts/qa/templates/by_category

Modified: scripts/qa/DebianQA/Watch.pm
URL: http://svn.debian.org/wsvn/scripts/qa/DebianQA/Watch.pm?rev=17711&op=diff
==============================================================================
--- scripts/qa/DebianQA/Watch.pm (original)
+++ scripts/qa/DebianQA/Watch.pm Mon Mar 17 02:45:24 2008
@@ -240,6 +240,7 @@
         (0..$#vers));
     return(undef,
         %{$vers[$order[-1]]},
+        upstream_dir => $dir,
         upstream_mangled => $mangled[$order[-1]]);
 }
 sub recurse_dirs($$);

Modified: scripts/qa/templates/by_category
URL: http://svn.debian.org/wsvn/scripts/qa/templates/by_category?rev=17711&op=diff
==============================================================================
--- scripts/qa/templates/by_category (original)
+++ scripts/qa/templates/by_category Mon Mar 17 02:45:24 2008
@@ -187,6 +187,9 @@
             pkg.watch.upstream_url | html %]">[%
                 pkg.watch.upstream_mangled
             %]</a>[% ELSE %][% pkg.watch.error %][% END %]
+            [% IF pkg.watch.upstream_dir %]
+            (<a href="$pkg.watch.upstream_dir">browse</a>)
+            [% END %]
             [% IF pkg.hilight.upstream %]
             [% IF pkg.watch.error %]
             <a href="[% "${pkg.svn.dir}" | format("$wsvn_url")




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