don't display autorhip if it doesn't exist

diff --git a/html.pl b/html.pl
index a4544b3..8f246ea 100755 (executable)
--- a/html.pl
+++ b/html.pl
@@ -246,6 +246,8 @@ debug 'authors' => \@authors;
 sub author_html {
        my ( $fh, $authid, $type, $label ) = @_;
 
+       return unless exists $authors->{$authid}->{$type};
+
        print $fh qq|<h2>$label</h2>\n|;
 
        foreach my $category ( sort keys %{ $authors->{$authid}->{$type} } ) {