Lines 308-318
sub CanItemBeReserved {
Link Here
|
308 |
my $item = GetItem($itemnumber); |
308 |
my $item = GetItem($itemnumber); |
309 |
my $biblio = Koha::Biblios->find( $item->{biblionumber} ); |
309 |
my $biblio = Koha::Biblios->find( $item->{biblionumber} ); |
310 |
my $patron = Koha::Patrons->find( $borrowernumber ); |
310 |
my $patron = Koha::Patrons->find( $borrowernumber ); |
311 |
if( !$patron || $patron->is_debarred ) { |
|
|
312 |
return 'debarred'; |
313 |
} |
314 |
my $borrower = $patron->unblessed; |
311 |
my $borrower = $patron->unblessed; |
315 |
|
312 |
|
|
|
313 |
return 'debarred' |
314 |
if $patron->is_debarred; |
315 |
|
316 |
# If an item is damaged and we don't allow holds on damaged items, we can stop right here |
316 |
# If an item is damaged and we don't allow holds on damaged items, we can stop right here |
317 |
return 'damaged' |
317 |
return 'damaged' |
318 |
if ( $item->{damaged} |
318 |
if ( $item->{damaged} |
319 |
- |
|
|