@@ -, +, @@ is not allowed to edit --- tools/batchMod.pl | 5 +++++ 1 file changed, 5 insertions(+) --- a/tools/batchMod.pl +++ a/tools/batchMod.pl @@ -191,6 +191,7 @@ if ($op eq "action") { $schema->txn_do( sub { # For each item + my $can_edit = {}; my $i = 1; foreach my $itemnumber (@itemnumbers) { $job->progress($i) if $runinbackground; @@ -198,6 +199,10 @@ if ($op eq "action") { next unless $item ; # Should have been tested earlier, but just in case... + + $can_edit->{ $item->homebranch } //= $patron->can_edit_item( $item->homebranch ); + next unless $can_edit->{ $item->homebranch }; + my $itemdata = $item->unblessed; if ($del) { my $return = $item->safe_delete; --