|
Lines 27-33
use Test::Exception;
Link Here
|
| 27 |
|
27 |
|
| 28 |
use C4::Context; |
28 |
use C4::Context; |
| 29 |
use Koha::Database; |
29 |
use Koha::Database; |
| 30 |
use Koha::Patron::Attribute::Type; |
|
|
| 31 |
use Koha::Patron::Attribute::Types; |
30 |
use Koha::Patron::Attribute::Types; |
| 32 |
|
31 |
|
| 33 |
my $schema = Koha::Database->new->schema; |
32 |
my $schema = Koha::Database->new->schema; |
|
Lines 289-295
subtest 'replace_library_limits() tests' => sub {
Link Here
|
| 289 |
|
288 |
|
| 290 |
subtest 'search_with_library_limits() tests' => sub { |
289 |
subtest 'search_with_library_limits() tests' => sub { |
| 291 |
|
290 |
|
| 292 |
plan tests => 3; |
291 |
plan tests => 4; |
| 293 |
|
292 |
|
| 294 |
$schema->storage->txn_begin; |
293 |
$schema->storage->txn_begin; |
| 295 |
|
294 |
|
|
Lines 326-331
subtest 'search_with_library_limits() tests' => sub {
Link Here
|
| 326 |
3, '3 attribute types are available for the specified branch' ); |
325 |
3, '3 attribute types are available for the specified branch' ); |
| 327 |
is( Koha::Patron::Attribute::Types->search_with_library_limits( {}, {}, $branch_2 )->count, |
326 |
is( Koha::Patron::Attribute::Types->search_with_library_limits( {}, {}, $branch_2 )->count, |
| 328 |
3, '3 attribute types are available for the specified branch' ); |
327 |
3, '3 attribute types are available for the specified branch' ); |
|
|
328 |
is( Koha::Patron::Attribute::Types->search_with_library_limits( {}, {}, undef )->count, |
| 329 |
4, '4 attribute types are available with no library passed' |
| 330 |
); |
| 329 |
|
331 |
|
| 330 |
$schema->storage->txn_rollback; |
332 |
$schema->storage->txn_rollback; |
| 331 |
}; |
333 |
}; |
| 332 |
- |
|
|