|
Lines 655-660
sub HoldTitle {
Link Here
|
| 655 |
my $patron = Koha::Patrons->find( $borrowernumber ); |
655 |
my $patron = Koha::Patrons->find( $borrowernumber ); |
| 656 |
return { code => 'PatronNotFound' } unless $patron; |
656 |
return { code => 'PatronNotFound' } unless $patron; |
| 657 |
|
657 |
|
|
|
658 |
# Check for patron expired, category and syspref settings |
| 659 |
return { code => 'PatronExpired' } if ($patron->category->effective_BlockExpiredPatronOpacActions && $patron->is_expired); |
| 660 |
|
| 658 |
# Get the biblio record, or return an error code |
661 |
# Get the biblio record, or return an error code |
| 659 |
my $biblionumber = $cgi->param('bib_id'); |
662 |
my $biblionumber = $cgi->param('bib_id'); |
| 660 |
my $biblio = Koha::Biblios->find( $biblionumber ); |
663 |
my $biblio = Koha::Biblios->find( $biblionumber ); |
|
Lines 736-741
sub HoldItem {
Link Here
|
| 736 |
my $patron = Koha::Patrons->find( $borrowernumber ); |
739 |
my $patron = Koha::Patrons->find( $borrowernumber ); |
| 737 |
return { code => 'PatronNotFound' } unless $patron; |
740 |
return { code => 'PatronNotFound' } unless $patron; |
| 738 |
|
741 |
|
|
|
742 |
# Check for patron expired, category and syspref settings |
| 743 |
return { code => 'PatronExpired' } if ($patron->category->effective_BlockExpiredPatronOpacActions && $patron->is_expired); |
| 744 |
|
| 739 |
# Get the biblio or return an error code |
745 |
# Get the biblio or return an error code |
| 740 |
my $biblionumber = $cgi->param('bib_id'); |
746 |
my $biblionumber = $cgi->param('bib_id'); |
| 741 |
my $biblio = Koha::Biblios->find( $biblionumber ); |
747 |
my $biblio = Koha::Biblios->find( $biblionumber ); |
| 742 |
- |
|
|