X-Git-Url: http://git.rot13.org/?a=blobdiff_plain;f=html.pl;h=8f246ea351c45406caca9642917b41ca412175ae;hb=6f739ea5d041badf4c86ef58ea5ff65726d0cc83;hp=a4544b305592c96a60bc1f7d1007918396562400;hpb=c47a4c3ad04ff5f0a203de27c55bd30b1c00eb17;p=koha-bibliografija

diff --git a/html.pl b/html.pl
index a4544b3..8f246ea 100755
--- 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} } ) {