Lines 706-712
sub migrate {
Link Here
|
706 |
$new_request->updated( dt_from_string() ); |
706 |
$new_request->updated( dt_from_string() ); |
707 |
$new_request->store; |
707 |
$new_request->store; |
708 |
|
708 |
|
709 |
my @default_attributes = (qw/title type author year volume isbn issn article_title article_author pages/); |
709 |
my %core_fields = %{ _get_core_fields() }; |
|
|
710 |
my @default_attributes = keys %core_fields; |
710 |
my $original_attributes = |
711 |
my $original_attributes = |
711 |
$original_request->extended_attributes->search( { type => { '-in' => \@default_attributes } } ); |
712 |
$original_request->extended_attributes->search( { type => { '-in' => \@default_attributes } } ); |
712 |
|
713 |
|
713 |
- |
|
|