@@ -, +, @@ --- Koha/Acquisition/Order.pm | 2 +- Koha/BackgroundJob/BatchDeleteBiblio.pm | 2 +- Koha/BackgroundJob/BatchDeleteItem.pm | 2 +- Koha/UI/Table/Builder/Items.pm | 8 +++++++- koha-tmpl/intranet-tmpl/prog/en/includes/html_helpers.inc | 6 +++--- 5 files changed, 13 insertions(+), 7 deletions(-) --- a/Koha/Acquisition/Order.pm +++ a/Koha/Acquisition/Order.pm @@ -131,7 +131,7 @@ sub cancel { $self->add_message( { message => 'error_delitem', - payload => { item => $item, reason => @{$deleted->messages}[0]->messages } + payload => { item => $item, reason => @{$deleted->messages}[0]->message } } ); } --- a/Koha/BackgroundJob/BatchDeleteBiblio.pm +++ a/Koha/BackgroundJob/BatchDeleteBiblio.pm @@ -119,7 +119,7 @@ sub process { code => 'item_not_deleted', biblionumber => $biblionumber, itemnumber => $item->itemnumber, - error => @{$deleted->messages}[0]->messages, + error => @{$deleted->messages}[0]->message, }; $schema->storage->txn_rollback; $job->progress( ++$job_progress )->store; --- a/Koha/BackgroundJob/BatchDeleteItem.pm +++ a/Koha/BackgroundJob/BatchDeleteItem.pm @@ -126,7 +126,7 @@ sub process { biblionumber => $item->biblionumber, barcode => $item->barcode, title => $item->biblio->title, - reason => $return, + reason => @{$return->messages}[0]->message, }; next; --- a/Koha/UI/Table/Builder/Items.pm +++ a/Koha/UI/Table/Builder/Items.pm @@ -108,7 +108,13 @@ sub _build_headers { my @witness_attributes = uniq map { my $item = $_; - map { defined $item->{$_} && $item->{$_} ne "" ? $_ : () } keys %$item + map { + defined $item->{$_} + && !ref( $item->{$_} ) # biblio and safe_to_delete are objects + && $item->{$_} ne "" + ? $_ + : () + } keys %$item } @$items; my ( $itemtag, $itemsubfield ) = --- a/koha-tmpl/intranet-tmpl/prog/en/includes/html_helpers.inc +++ a/koha-tmpl/intranet-tmpl/prog/en/includes/html_helpers.inc @@ -261,18 +261,18 @@ [% UNLESS can_be_edited %]