From: cjwatson <>
Date: Thu, 6 Mar 2003 01:33:19 +0000 (-0800)
Subject: [project @ 2003-03-05 17:33:19 by cjwatson]
X-Git-Tag: release/2.6.0~948
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=bb609b8db53b6f99c4157beed88eac72c386f705;p=debbugs.git

[project @ 2003-03-05 17:33:19 by cjwatson]
Add a link from per-package indices to the PTS, if appropriate.
---

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";