if ($html) {
print "<div class=\"package\"><pre>";
print "<a name=\"$p\"><strong>Package:</strong></a> " . scanlib::wwwname($p);
- print " ($scanlib::section{$p}).\n";
+ if (defined($scanlib::section{$p})) {
+ print " ($scanlib::section{$p}).\n";
+ } else {
+ print " (unknown).\n";
+ }
print "<strong>Maintainer:</strong> ";
- if (defined($scanlib::maintainer{$p})) {
+ if (exists($scanlib::maintainer{$p}) && $scanlib::maintainer{$p} ne '') {
if ($scanlib::maintainer{$p} =~ /(.*) <([^>]*)>/) {
($name,$email) = ($1,$2);
} elsif ($scanlib::maintainer{$p} =~ /<(.*) \((.*)\)>/) {
} elsif ($scanlib::maintainer{$p} =~ /<(.*)>/) {
$name = $email = $1;
}
- print "$name <<a href=\"http://bugs.debian.org/$email\">$email</A>>\n";
+ if (defined($name)) {
+ print "$name <<a href=\"http://bugs.debian.org/$email\">$email</A>>\n";
+ } else {
+ print "$scanlib::maintainer{$p}\n";
+ }
} else {
print "unknown\n";
}