|
Lines 50-55
use Koha::Patron::Images;
Link Here
|
| 50 |
use Koha::Patron::Messages; |
50 |
use Koha::Patron::Messages; |
| 51 |
use Koha::Patron::Modifications; |
51 |
use Koha::Patron::Modifications; |
| 52 |
use Koha::Patron::Relationships; |
52 |
use Koha::Patron::Relationships; |
|
|
53 |
use Koha::Patron::Restrictions; |
| 53 |
use Koha::Patrons; |
54 |
use Koha::Patrons; |
| 54 |
use Koha::Plugins; |
55 |
use Koha::Plugins; |
| 55 |
use Koha::Recalls; |
56 |
use Koha::Recalls; |
|
Lines 1222-1227
sub overdues {
Link Here
|
| 1222 |
); |
1223 |
); |
| 1223 |
} |
1224 |
} |
| 1224 |
|
1225 |
|
|
|
1226 |
|
| 1227 |
=head3 restrictions |
| 1228 |
|
| 1229 |
my $restrictions = $patron->restrictions; |
| 1230 |
|
| 1231 |
Returns the patron restrictions. |
| 1232 |
|
| 1233 |
=cut |
| 1234 |
|
| 1235 |
sub restrictions { |
| 1236 |
my ($self) = @_; |
| 1237 |
my $restrictions_rs = $self->_result->borrower_debarments; |
| 1238 |
return Koha::Patron::Restrictions->_new_from_dbic($restrictions_rs); |
| 1239 |
} |
| 1240 |
|
| 1225 |
=head3 get_routing_lists |
1241 |
=head3 get_routing_lists |
| 1226 |
|
1242 |
|
| 1227 |
my $routinglists = $patron->get_routing_lists |
1243 |
my $routinglists = $patron->get_routing_lists |
| 1228 |
- |
|
|