Lines 459-464
sub batch_update {
Link Here
|
459 |
|
459 |
|
460 |
my ( @modified_itemnumbers, $modified_fields ); |
460 |
my ( @modified_itemnumbers, $modified_fields ); |
461 |
my $i; |
461 |
my $i; |
|
|
462 |
my @errors; |
462 |
my $schema = Koha::Database->new->schema; |
463 |
my $schema = Koha::Database->new->schema; |
463 |
while ( my $item = $self->next ) { |
464 |
while ( my $item = $self->next ) { |
464 |
|
465 |
|
Lines 578-583
sub batch_update {
Link Here
|
578 |
} |
579 |
} |
579 |
) |
580 |
) |
580 |
} catch { |
581 |
} catch { |
|
|
582 |
push @errors, { |
583 |
error => eval { $_->{error} } || "$_", |
584 |
}; |
581 |
warn $_ |
585 |
warn $_ |
582 |
}; |
586 |
}; |
583 |
|
587 |
|
Lines 600-606
sub batch_update {
Link Here
|
600 |
} |
604 |
} |
601 |
} |
605 |
} |
602 |
|
606 |
|
603 |
return ( { modified_itemnumbers => \@modified_itemnumbers, modified_fields => $modified_fields }, $self ); |
607 |
return ( |
|
|
608 |
{ modified_itemnumbers => \@modified_itemnumbers, modified_fields => $modified_fields, errors => \@errors }, |
609 |
$self |
610 |
); |
604 |
} |
611 |
} |
605 |
|
612 |
|
606 |
=head2 apply_regex |
613 |
=head2 apply_regex |