From: cjwatson <>
Date: Thu, 3 Oct 2002 18:55:36 +0000 (-0800)
Subject: [project @ 2002-10-03 11:55:36 by cjwatson]
X-Git-Tag: release/2.6.0~1039
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=f7ddc4b81a37d3e6e4d4483c91c3a7891c2a37e1;p=debbugs.git

[project @ 2002-10-03 11:55:36 by cjwatson]
Squash a Perl warning.
---

diff --git a/cgi/pkgreport.cgi b/cgi/pkgreport.cgi
index 25002b03..5dc91a73 100755
--- a/cgi/pkgreport.cgi
+++ b/cgi/pkgreport.cgi
@@ -11,6 +11,8 @@ require './common.pl';
 require '/etc/debbugs/config';
 require '/etc/debbugs/text';
 
+use vars qw($gPackagePages $gWebDomain);
+
 nice(5);
 
 my %param = readparse();
@@ -196,7 +198,6 @@ if (defined $pkg || defined $src) {
 	print ".\n";
     }
     if ($pkg) {
-	my $stupidperl = ${debbugs::gPackagePages};
 	printf "<p>You might like to refer to the <a href=\"%s\">%s package page</a>", urlsanit("http://${debbugs::gPackagePages}/$pkg"), htmlsanit("$pkg");
 	if ($pkgsrc{ $pkg }) {
 	    printf ", or to the source package <a href=\"%s\">%s</a>'s bug page.</p>\n", srcurl($pkgsrc{$pkg}), htmlsanit($pkgsrc{$pkg});