From 97304d173f0969bcbd16ae6b8f1abfee134b22e5 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 | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/tools/batchMod.pl b/tools/batchMod.pl index adda3766db..a7431a6a71 100755 --- a/tools/batchMod.pl +++ b/tools/batchMod.pl @@ -154,12 +154,16 @@ 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