Lines 358-367
sub SearchAuthorities {
Link Here
|
358 |
$reported_tag .= '$' . $_->[0] . $_->[1]; |
358 |
$reported_tag .= '$' . $_->[0] . $_->[1]; |
359 |
} |
359 |
} |
360 |
} |
360 |
} |
361 |
my $thisauthtype = GetAuthType(GetAuthTypeCode($authid)); |
361 |
my %thisauthtype = GetAuthType(GetAuthTypeCode($authid)); |
362 |
$thisauthtype |= GetAuthType($authtypecode) if $authtypecode; |
362 |
unless (defined %thisauthtype) { |
363 |
$newline{authtype} = defined ($thisauthtype) ? |
363 |
%thisauthtype = GetAuthType($authtypecode) if $authtypecode; |
364 |
$thisauthtype->{'authtypetext'} : ''; |
364 |
} |
|
|
365 |
$newline{authtype} = defined (%thisauthtype) ? |
366 |
$thisauthtype{'authtypetext'} : ''; |
365 |
$newline{summary} = $summary; |
367 |
$newline{summary} = $summary; |
366 |
$newline{even} = $counter % 2; |
368 |
$newline{even} = $counter % 2; |
367 |
$newline{reported_tag} = $reported_tag; |
369 |
$newline{reported_tag} = $reported_tag; |
368 |
- |
|
|