check for undefined input from ports database

PR: 222615
This commit is contained in:
Wolfram Schneider 2017-09-26 10:54:16 +00:00
parent ade1f884a0
commit 181f47b8fb
Notes: svn2git 2020-12-08 03:00:23 +00:00
svn path=/head/; revision=50931

View file

@ -285,7 +285,13 @@ EOF
print $moutf "<h3>",$category_groups{$cg},"</h3>\n";
print $moutf "<ul>\n";
foreach my $key (sort(keys(%stats))) {
if (!defined $category_description{$key}{group}) {
warn "Warning: no category_description/group for $key, ignore\n";
next;
}
next if ($category_description{$key}{group} ne $cg);
# For the master file...
print $moutf
"<li><a href=\"$key.html\">\u$key</a> <em>($stats{$key})</em>";