Lines 354-360
sub SearchAuthorities {
Link Here
|
354 |
my $thisauthtype = GetAuthType(GetAuthTypeCode($authid)); |
354 |
my $thisauthtype = GetAuthType(GetAuthTypeCode($authid)); |
355 |
$newline{authtype} = defined ($thisauthtype) ? |
355 |
$newline{authtype} = defined ($thisauthtype) ? |
356 |
$thisauthtype->{'authtypetext'} : |
356 |
$thisauthtype->{'authtypetext'} : |
357 |
GetAuthType($authtypecode)->{'authtypetext'}; |
357 |
(GetAuthType($authtypecode) ? $_->{'authtypetext'} : ''); |
358 |
$newline{summary} = $summary; |
358 |
$newline{summary} = $summary; |
359 |
$newline{even} = $counter % 2; |
359 |
$newline{even} = $counter % 2; |
360 |
$newline{reported_tag} = $reported_tag; |
360 |
$newline{reported_tag} = $reported_tag; |
361 |
- |
|
|