@@ -, +, @@ --- cataloguing/additem.pl | 2 +- tools/viewlog.pl | 3 ++- 2 files changed, 3 insertions(+), 2 deletions(-) --- a/cataloguing/additem.pl +++ a/cataloguing/additem.pl @@ -687,7 +687,7 @@ if ($op eq "additem") { my $items = Koha::Items->search({ biblionumber => $biblionumber }); while ( my $item = $items->next ) { $error = $item->safe_delete({ skip_modzebra_update => 1 }); - next if $error eq '1'; # Means ok + next if ref $error eq 'Koha::Item'; # Deleted item is returned if deletion successful push @errors,$error; } C4::Biblio::ModZebra( $biblionumber, "specialUpdate", "biblioserver" ); --- a/tools/viewlog.pl +++ a/tools/viewlog.pl @@ -50,6 +50,7 @@ my $input = new CGI; $debug or $debug = $cgi_debug; my $do_it = $input->param('do_it'); my @modules = $input->multi_param("modules"); +warn Data::Dumper::Dumper( @modules ); my $user = $input->param("user") // ''; my @actions = $input->multi_param("actions"); my @interfaces = $input->multi_param("interfaces"); @@ -147,7 +148,7 @@ if ($do_it) { $search_params{info} = $info if $info; $search_params{object} = $object if $object; } - +warn Data::Dumper::Dumper( \%search_params ); my @logs = Koha::ActionLogs->search(\%search_params); my @data; --