From 427af975e002468baa4bba9166b63f6bd6346369 Mon Sep 17 00:00:00 2001 From: Kyle M Hall Date: Wed, 4 Dec 2019 13:33:47 -0500 Subject: [PATCH] Bug 20256: (QA follow-up) Skip batch editing items the user is not allowed to edit Signed-off-by: Bob Bennhoff - CLiC Signed-off-by: Martin Renvoize --- tools/batchMod.pl | 5 +++++ 1 file changed, 5 insertions(+) diff --git a/tools/batchMod.pl b/tools/batchMod.pl index 426da34b7a..7f96f17659 100755 --- a/tools/batchMod.pl +++ b/tools/batchMod.pl @@ -178,12 +178,17 @@ if ($op eq "action") { $schema->txn_do( sub { # For each item + my $can_edit = {}; my $i = 1; foreach my $itemnumber (@itemnumbers) { my $item = Koha::Items->find($itemnumber); 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; -- 2.20.1