|
Lines 19-25
Link Here
|
| 19 |
|
19 |
|
| 20 |
use Modern::Perl; |
20 |
use Modern::Perl; |
| 21 |
|
21 |
|
| 22 |
use Test::More tests => 12; |
22 |
use Test::More tests => 13; |
| 23 |
|
23 |
|
| 24 |
use C4::Biblio; |
24 |
use C4::Biblio; |
| 25 |
use C4::Context; |
25 |
use C4::Context; |
|
Lines 342-349
subtest 'get_float_libraries and validate_float_sibling' => sub {
Link Here
|
| 342 |
my $library3 = $builder->build_object({ class => 'Koha::Libraries' }); |
342 |
my $library3 = $builder->build_object({ class => 'Koha::Libraries' }); |
| 343 |
my $library4 = $builder->build_object({ class => 'Koha::Libraries' }); |
343 |
my $library4 = $builder->build_object({ class => 'Koha::Libraries' }); |
| 344 |
|
344 |
|
| 345 |
my $root1 = $builder->build_object( { class => 'Koha::Library::Groups', value => { ft_local_hold_group => 1 } } ); |
345 |
my $root1 = $builder->build_object( { class => 'Koha::Library::Groups', value => { ft_local_float_group => 1 } } ); |
| 346 |
my $root2 = $builder->build_object( { class => 'Koha::Library::Groups', value => { ft_local_hold_group => 1 } } ); |
346 |
my $root2 = $builder->build_object( { class => 'Koha::Library::Groups', value => { ft_local_float_group => 1 } } ); |
| 347 |
# Float group 1 |
347 |
# Float group 1 |
| 348 |
$builder->build_object( { class => 'Koha::Library::Groups', value => { parent_id => $root1->id, branchcode => $library1->branchcode } } ); |
348 |
$builder->build_object( { class => 'Koha::Library::Groups', value => { parent_id => $root1->id, branchcode => $library1->branchcode } } ); |
| 349 |
$builder->build_object( { class => 'Koha::Library::Groups', value => { parent_id => $root1->id, branchcode => $library2->branchcode } } ); |
349 |
$builder->build_object( { class => 'Koha::Library::Groups', value => { parent_id => $root1->id, branchcode => $library2->branchcode } } ); |
|
Lines 351-360
subtest 'get_float_libraries and validate_float_sibling' => sub {
Link Here
|
| 351 |
$builder->build_object( { class => 'Koha::Library::Groups', value => { parent_id => $root2->id, branchcode => $library3->branchcode } } ); |
351 |
$builder->build_object( { class => 'Koha::Library::Groups', value => { parent_id => $root2->id, branchcode => $library3->branchcode } } ); |
| 352 |
$builder->build_object( { class => 'Koha::Library::Groups', value => { parent_id => $root2->id, branchcode => $library4->branchcode } } ); |
352 |
$builder->build_object( { class => 'Koha::Library::Groups', value => { parent_id => $root2->id, branchcode => $library4->branchcode } } ); |
| 353 |
|
353 |
|
| 354 |
my @libraries1 = $library1->get_float_libraries(); |
354 |
my @libraries1 = $library1->get_float_libraries()->as_list; |
| 355 |
is(scalar @libraries1, '2', '1st float group contains 2 libraries'); |
355 |
is(scalar @libraries1, '2', '1st float group contains 2 libraries'); |
| 356 |
|
356 |
|
| 357 |
my @libraries2 = $library3->get_float_libraries(); |
357 |
my @libraries2 = $library3->get_float_libraries()->as_list; |
| 358 |
is(scalar @libraries2, '2', '2nd float group also contains 2 libraries'); |
358 |
is(scalar @libraries2, '2', '2nd float group also contains 2 libraries'); |
| 359 |
|
359 |
|
| 360 |
ok($library1->validate_float_sibling({ branchcode => $library2->branchcode }), "Library1 and library2 belong in to the same float group."); |
360 |
ok($library1->validate_float_sibling({ branchcode => $library2->branchcode }), "Library1 and library2 belong in to the same float group."); |
| 361 |
- |
|
|