|
Lines 539-547
sub marc_records_to_documents {
Link Here
|
| 539 |
|
539 |
|
| 540 |
if ( $self->index eq 'authorities' ){ |
540 |
if ( $self->index eq 'authorities' ){ |
| 541 |
my $authtypecode = GuessAuthTypeCode( $record ); |
541 |
my $authtypecode = GuessAuthTypeCode( $record ); |
| 542 |
my $field = $record->field( $auth_match_headings{ $authtypecode } ); |
542 |
if( $authtypecode ){ |
| 543 |
my $heading = C4::Heading->new_from_field( $field, undef, 1 ); #new auth heading |
543 |
my $field = $record->field( $auth_match_headings{ $authtypecode } ); |
| 544 |
push @{$record_document->{'match-heading'}}, $heading->search_form if $heading; |
544 |
my $heading = C4::Heading->new_from_field( $field, undef, 1 ); #new auth heading |
|
|
545 |
push @{$record_document->{'match-heading'}}, $heading->search_form if $heading; |
| 546 |
} else { |
| 547 |
warn "Cannot determine authority type for record: " . $record->field('001')->as_string; |
| 548 |
} |
| 545 |
} |
549 |
} |
| 546 |
|
550 |
|
| 547 |
my $mappings = $rules->{leader}; |
551 |
my $mappings = $rules->{leader}; |
| 548 |
- |
|
|