Lines 687-693
if ($op eq "additem") {
Link Here
|
687 |
my $items = Koha::Items->search({ biblionumber => $biblionumber }); |
687 |
my $items = Koha::Items->search({ biblionumber => $biblionumber }); |
688 |
while ( my $item = $items->next ) { |
688 |
while ( my $item = $items->next ) { |
689 |
$error = $item->safe_delete({ skip_modzebra_update => 1 }); |
689 |
$error = $item->safe_delete({ skip_modzebra_update => 1 }); |
690 |
next if $error eq '1'; # Means ok |
690 |
next if ref $error eq 'Koha::Item'; # Deleted item is returned if deletion successful |
691 |
push @errors,$error; |
691 |
push @errors,$error; |
692 |
} |
692 |
} |
693 |
C4::Biblio::ModZebra( $biblionumber, "specialUpdate", "biblioserver" ); |
693 |
C4::Biblio::ModZebra( $biblionumber, "specialUpdate", "biblioserver" ); |
694 |
- |
|
|