|
Lines 439-444
sub cannot_be_transferred {
Link Here
|
| 439 |
if ( !Koha::Patrons->find($to) ) { |
439 |
if ( !Koha::Patrons->find($to) ) { |
| 440 |
return 'new_owner_not_found'; |
440 |
return 'new_owner_not_found'; |
| 441 |
} |
441 |
} |
|
|
442 |
my $to_patron = Koha::Patrons->find($to); |
| 443 |
|
| 444 |
if ( $self->public ) { |
| 445 |
return 'unauthorized_transfer' |
| 446 |
unless C4::Auth::haspermission( |
| 447 |
$to_patron->userid, |
| 448 |
{ |
| 449 |
lists => [ |
| 450 |
'create_public_lists', 'delete_public_lists', 'edit_public_list_contents', 'edit_public_lists' |
| 451 |
] |
| 452 |
} |
| 453 |
); |
| 454 |
} |
| 442 |
if ( !$self->public && !$shares->search( { borrowernumber => $to } )->count ) { |
455 |
if ( !$self->public && !$shares->search( { borrowernumber => $to } )->count ) { |
| 443 |
return 'new_owner_has_no_share'; |
456 |
return 'new_owner_has_no_share'; |
| 444 |
} |
457 |
} |
| 445 |
- |
|
|