|
Lines 19-25
use Modern::Perl;
Link Here
|
| 19 |
|
19 |
|
| 20 |
use Koha::Database; |
20 |
use Koha::Database; |
| 21 |
use Koha::Exceptions; |
21 |
use Koha::Exceptions; |
| 22 |
use Koha::Libraries; |
|
|
| 23 |
|
22 |
|
| 24 |
use Try::Tiny qw( catch try ); |
23 |
use Try::Tiny qw( catch try ); |
| 25 |
|
24 |
|
|
Lines 87-92
sub get_library_limits {
Link Here
|
| 87 |
|
86 |
|
| 88 |
return unless @branchcodes; |
87 |
return unless @branchcodes; |
| 89 |
|
88 |
|
|
|
89 |
require Koha::Libraries; |
| 90 |
|
| 90 |
my $filter = [ map { { branchcode => $_ } } @branchcodes ]; |
91 |
my $filter = [ map { { branchcode => $_ } } @branchcodes ]; |
| 91 |
my $libraries = Koha::Libraries->search( $filter ); |
92 |
my $libraries = Koha::Libraries->search( $filter ); |
| 92 |
|
93 |
|
| 93 |
- |
|
|