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