[project @ 2005-05-02 18:52:56 by cjwatson]

print helpful message for packages with no maintainer

diff --git a/cgi/pkgreport.cgi b/cgi/pkgreport.cgi
index 1955c4fd2d4d4b17f54e0e3edc6e40c370880be5..0f5115a8bca387c4c32bfe1b9471cb8039266027 100755 (executable)
--- a/cgi/pkgreport.cgi
+++ b/cgi/pkgreport.cgi
@@ -248,16 +248,18 @@ print "<H1>" . "$debbugs::gProject$Archived $debbugs::gBug report logs: $title"
 my $showresult = 1;
 
 if (defined $pkg || defined $src) {
+    my $showpkg = (defined $pkg) ? $pkg : "source package $src";
     my %maintainers = %{getmaintainers()};
     my $maint = $pkg ? $maintainers{$pkg} : $maintainers{$src} ? $maintainers{$src} : undef;
     if (defined $maint) {
         print '<p>';
-        my $showpkg = (defined $pkg) ? $pkg : "source package $src";
         print htmlmaintlinks(sub { $_[0] == 1 ? "Maintainer for $showpkg is "
                                               : "Maintainers for $showpkg are "
                                  },
                              $maint);
         print ".</p>\n";
+    } else {
+        print "<p>No maintainer for $showpkg. Please do not report new bugs against this package.</p>\n";
     }
     if (defined $maint or @bugs) {
        my %pkgsrc = %{getpkgsrc()};