|
Lines 201-206
if ($op eq "action") {
Link Here
|
| 201 |
$schema->txn_do( |
201 |
$schema->txn_do( |
| 202 |
sub { |
202 |
sub { |
| 203 |
# For each item |
203 |
# For each item |
|
|
204 |
my $can_edit = {}; |
| 204 |
my $i = 1; |
205 |
my $i = 1; |
| 205 |
my $extra_headers = {}; |
206 |
my $extra_headers = {}; |
| 206 |
foreach my $itemnumber (@itemnumbers) { |
207 |
foreach my $itemnumber (@itemnumbers) { |
|
Lines 209-214
if ($op eq "action") {
Link Here
|
| 209 |
next |
210 |
next |
| 210 |
unless $item |
211 |
unless $item |
| 211 |
; # Should have been tested earlier, but just in case... |
212 |
; # Should have been tested earlier, but just in case... |
|
|
213 |
|
| 214 |
$can_edit->{ $item->homebranch } //= $patron->can_edit_item( $item->homebranch ); |
| 215 |
next unless $can_edit->{ $item->homebranch }; |
| 216 |
|
| 212 |
my $itemdata = $item->unblessed; |
217 |
my $itemdata = $item->unblessed; |
| 213 |
if ($del) { |
218 |
if ($del) { |
| 214 |
my $return = $item->safe_delete; |
219 |
my $return = $item->safe_delete; |
| 215 |
- |
|
|