Lines 122-135
subtest 'Koha::Library::Group->get_search_groups' => sub {
Link Here
|
122 |
is_deeply( $groups[0]->unblessed, $groupA->unblessed, 'Get search groups opac should return enabled group' ); |
122 |
is_deeply( $groups[0]->unblessed, $groupA->unblessed, 'Get search groups opac should return enabled group' ); |
123 |
@groups = Koha::Library::Groups->get_search_groups({ interface => 'staff' }); |
123 |
@groups = Koha::Library::Groups->get_search_groups({ interface => 'staff' }); |
124 |
is_deeply( $groups[0]->unblessed, $groupB->unblessed, 'Get search groups staff should return enabled group' ); |
124 |
is_deeply( $groups[0]->unblessed, $groupB->unblessed, 'Get search groups staff should return enabled group' ); |
125 |
|
|
|
126 |
# TODO This is not implemented because not used yet |
127 |
# ->has_child only works with libraries |
128 |
#is( $groupA->has_child( $groupA1 ), 1, 'groupA1 should be condidered as a child of groupA' ); |
129 |
|
130 |
# FIXME At the time of writing this test fails because the ->children methods does not return more than 1 level of depth |
131 |
# See Bug 15707 comments 166-170+ |
132 |
#is( $groupA->has_child( $groupA1_library2->branchcode ), 1, 'groupA1_library2 should be considered as a child of groupA (it is a grandchild)' ); |
133 |
}; |
125 |
}; |
134 |
|
126 |
|
135 |
my $groupX = Koha::Library::Group->new( { title => "Group X" } )->store(); |
127 |
my $groupX = Koha::Library::Group->new( { title => "Group X" } )->store(); |
136 |
- |
|
|