|
Lines 51-56
use Koha::Patron::Images;
Link Here
|
| 51 |
use Koha::Patron::Messages; |
51 |
use Koha::Patron::Messages; |
| 52 |
use Koha::Patron::Modifications; |
52 |
use Koha::Patron::Modifications; |
| 53 |
use Koha::Patron::Relationships; |
53 |
use Koha::Patron::Relationships; |
|
|
54 |
use Koha::Patron::Restrictions; |
| 54 |
use Koha::Patrons; |
55 |
use Koha::Patrons; |
| 55 |
use Koha::Plugins; |
56 |
use Koha::Plugins; |
| 56 |
use Koha::Recalls; |
57 |
use Koha::Recalls; |
|
Lines 1256-1261
sub overdues {
Link Here
|
| 1256 |
); |
1257 |
); |
| 1257 |
} |
1258 |
} |
| 1258 |
|
1259 |
|
|
|
1260 |
|
| 1261 |
=head3 restrictions |
| 1262 |
|
| 1263 |
my $restrictions = $patron->restrictions; |
| 1264 |
|
| 1265 |
Returns the patron restrictions. |
| 1266 |
|
| 1267 |
=cut |
| 1268 |
|
| 1269 |
sub restrictions { |
| 1270 |
my ($self) = @_; |
| 1271 |
my $restrictions_rs = $self->_result->borrower_debarments; |
| 1272 |
return Koha::Patron::Restrictions->_new_from_dbic($restrictions_rs); |
| 1273 |
} |
| 1274 |
|
| 1259 |
=head3 get_routing_lists |
1275 |
=head3 get_routing_lists |
| 1260 |
|
1276 |
|
| 1261 |
my $routinglists = $patron->get_routing_lists |
1277 |
my $routinglists = $patron->get_routing_lists |
| 1262 |
- |
|
|