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 |
} |