| Lines 74-79
          is( $library->id, $groupA_library1->branchcode, 'Branchcode for fetched library
      
      
        Link Here | 
        
          | 74 |  | 74 |  | 
        
          | 75 | my @libraries_not_direct_children = $groupA->libraries_not_direct_children(); | 75 | my @libraries_not_direct_children = $groupA->libraries_not_direct_children(); | 
        
          | 76 | $in_list = any { $_->id eq $groupA_library1->branchcode } @libraries_not_direct_children; | 76 | $in_list = any { $_->id eq $groupA_library1->branchcode } @libraries_not_direct_children; | 
          
            
              | 77 | ok( !$in_list, 'Method libraries_not_direct_children returns all libraries not direct decendents of group, library 1 is not in the list'); | 77 | ok( !$in_list, 'Method libraries_not_direct_children returns all libraries not direct descendants of group, library 1 is not in the list'); | 
        
          | 78 | $in_list = any { $_->id eq $groupA1_library2->branchcode } @libraries_not_direct_children; | 78 | $in_list = any { $_->id eq $groupA1_library2->branchcode } @libraries_not_direct_children; | 
          
            
              | 79 | ok( $in_list, 'Method libraries_not_direct_children returns all libraries not direct decendents of group, library 2 is in the list'); | 79 | ok( $in_list, 'Method libraries_not_direct_children returns all libraries not direct descendants of group, library 2 is in the list'); | 
            
              | 80 | -  |  |  |