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