|
Lines 111-117
sub add_bib1_field_map {
Link Here
|
| 111 |
my ($self, $class, $field, $server, $attributes) = @_; |
111 |
my ($self, $class, $field, $server, $attributes) = @_; |
| 112 |
|
112 |
|
| 113 |
$self->add_search_field( $class => $field ); |
113 |
$self->add_search_field( $class => $field ); |
| 114 |
$self->add_search_field_alias( $class => $field => $field ); |
|
|
| 115 |
return $self->_add_field_mapping($self->bib1_field_map, $class, $field, $server, $attributes); |
114 |
return $self->_add_field_mapping($self->bib1_field_map, $class, $field, $server, $attributes); |
| 116 |
} |
115 |
} |
| 117 |
|
116 |
|
|
Lines 542-555
sub initialize {
Link Here
|
| 542 |
$self->add_bib1_field_map( |
541 |
$self->add_bib1_field_map( |
| 543 |
$class => $field => $server => $bib1_mapping ); |
542 |
$class => $field => $server => $bib1_mapping ); |
| 544 |
} |
543 |
} |
| 545 |
$self->add_search_field_alias( $class => $field => |
|
|
| 546 |
$field_mappings->{$class}->{$field}->{'index'} ); |
| 547 |
foreach my $alias ( |
544 |
foreach my $alias ( |
| 548 |
@{ $field_mappings->{$class}->{$field}->{'aliases'} } ) |
545 |
@{ $field_mappings->{$class}->{$field}->{'aliases'} } ) |
| 549 |
{ |
546 |
{ |
| 550 |
next |
|
|
| 551 |
if ( $alias eq |
| 552 |
$field_mappings->{$class}->{$field}->{'index'} ); |
| 553 |
$self->add_search_field_alias( $class => $field => $alias ); |
547 |
$self->add_search_field_alias( $class => $field => $alias ); |
| 554 |
} |
548 |
} |
| 555 |
} |
549 |
} |