@@ -, +, @@ perl -c Koha/AuthorisedValue.pm perl -c Koha/Patron/Category.pm perl -c Koha/Patron/Attribute/Type.pm perl -c Koha/Account/DebitType.pm perl -c Koha/Account/CreditType.pm --- Koha/Object/Limit/Library.pm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) --- a/Koha/Object/Limit/Library.pm +++ a/Koha/Object/Limit/Library.pm @@ -19,7 +19,6 @@ use Modern::Perl; use Koha::Database; use Koha::Exceptions; -use Koha::Libraries; use Try::Tiny qw( catch try ); @@ -87,6 +86,8 @@ sub get_library_limits { return unless @branchcodes; + require Koha::Libraries; + my $filter = [ map { { branchcode => $_ } } @branchcodes ]; my $libraries = Koha::Libraries->search( $filter ); --