diff --git a/modules/t/ontologyTerm.t b/modules/t/ontologyTerm.t index e5116c369486ff3adecf2593bfbbc59c3226975e..86b17fd95cebe91c9b76b8a0be9970b92e7a2be2 100644 --- a/modules/t/ontologyTerm.t +++ b/modules/t/ontologyTerm.t @@ -78,7 +78,9 @@ is(@{$efo_roots}, 0, "Found no efo roots"); is_deeply($term, $direct_term, 'Fetching the OntologyTerm from the OntologyXref should match the same object from OntologyTermAdaptor'); } } - - +$term = $go_adaptor->fetch_by_accession('GO:0000182',1); # unintentionally picked an obsolete term for testing on. +my $term_list = $go_adaptor->fetch_all_by_descendant_term($term); +my $inclusive_term_list = $go_adaptor->fetch_all_by_descendant_term($term,undef,undef,1); +ok (scalar(@$term_list) == scalar(@$inclusive_term_list) - 1, "Zero_distance flag on fetch_all_by_descendant_term"); done_testing();