|
Lines 209-216
sub remove_biblios {
Link Here
|
| 209 |
my $borrowernumber = $params->{borrowernumber}; |
209 |
my $borrowernumber = $params->{borrowernumber}; |
| 210 |
return unless @$biblionumbers; |
210 |
return unless @$biblionumbers; |
| 211 |
|
211 |
|
|
|
212 |
my $patron = Koha::Patrons->find( $borrowernumber ); |
| 213 |
my $staffuser = 1 if ( haspermission( $patron->userid, {'catalogue' => 1 })); |
| 212 |
my $number_removed = 0; |
214 |
my $number_removed = 0; |
| 213 |
if( ( $self->owner == $borrowernumber && $self->allow_change_from_owner ) |
215 |
if( ( $self->owner == $borrowernumber && $self->allow_change_from_owner ) |
|
|
216 |
|| ( $staffuser && $self->allow_change_from_staff ) |
| 214 |
|| $self->allow_change_from_others ) { |
217 |
|| $self->allow_change_from_others ) { |
| 215 |
$number_removed += $self->get_contents->search({ |
218 |
$number_removed += $self->get_contents->search({ |
| 216 |
biblionumber => $biblionumbers, |
219 |
biblionumber => $biblionumbers, |
| 217 |
- |
|
|