Lines 217-223
sub search_auth_compat {
Link Here
|
217 |
# with the record. It's not documented why this is the case, so |
217 |
# with the record. It's not documented why this is the case, so |
218 |
# it's not reproduced here yet. |
218 |
# it's not reproduced here yet. |
219 |
my $authtype = $rs->single; |
219 |
my $authtype = $rs->single; |
220 |
my $auth_tag_to_report = $authtype ? $authtype->auth_tag_to_report : $authtypecode; |
220 |
my $auth_tag_to_report = $authtype ? $authtype->auth_tag_to_report : ""; |
221 |
my $marc = $self->json2marc($marc_json); |
221 |
my $marc = $self->json2marc($marc_json); |
222 |
my $mainentry = $marc->field($auth_tag_to_report); |
222 |
my $mainentry = $marc->field($auth_tag_to_report); |
223 |
my $reported_tag; |
223 |
my $reported_tag; |
224 |
- |
|
|