Print a warning if a category has no description.

This commit is contained in:
Wolfram Schneider 1999-12-25 21:17:36 +00:00
parent 8d4d0d5c3e
commit c0a2428b05
Notes: svn2git 2020-12-08 03:00:23 +00:00
svn path=/www/; revision=6277

View file

@ -249,6 +249,14 @@ browse the following categories:\n";
if ($category_description{$key}) {
print MOUTF " -- " . $category_description{$key};
}
# Someone forgot to add a category to the description file
# or there is a typo in the category field.
else {
warn "No description found for category: ``$key''!\n";
warn "Please fix me or send an E-Mail to doc\@FreeBSD.org\a\n";
sleep(3);
}
print MOUTF "</LI>\n";
# Create the category file