From bb609b8db53b6f99c4157beed88eac72c386f705 Mon Sep 17 00:00:00 2001 From: cjwatson <> Date: Wed, 5 Mar 2003 17:33:19 -0800 Subject: [PATCH] [project @ 2003-03-05 17:33:19 by cjwatson] Add a link from per-package indices to the PTS, if appropriate. --- cgi/pkgreport.cgi | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) diff --git a/cgi/pkgreport.cgi b/cgi/pkgreport.cgi index 7d791817..0031cc47 100755 --- a/cgi/pkgreport.cgi +++ b/cgi/pkgreport.cgi @@ -220,10 +220,14 @@ if (defined $pkg || defined $src) { push @references, sprintf "to the <a href=\"%s\">%s package page</a>", urlsanit("http://${debbugs::gPackagePages}/$pkg"), htmlsanit("$pkg"); } if ($srcforpkg) { + if (defined $debbugs::gSubscriptionDomain) { + push @references, "to the <a href=\"http://$debbugs::gSubscriptionDomain/$srcforpkg\">Package Tracking System</a>"; + } push @references, sprintf "to the source package <a href=\"%s\">%s</a>'s bug page", srcurl($srcforpkg), htmlsanit($srcforpkg); } if (@references) { - print "<p>You might like to refer ", join(", or ", @references), ".</p>\n"; + $references[$#references] = "or $references[$#references]" if @references > 1; + print "<p>You might like to refer ", join(", ", @references), ".</p>\n"; } } print "<p>If you find a bug not listed here, please\n"; -- 2.39.5