diff --git a/modules/t/transcript.t b/modules/t/transcript.t index f4e546019fef1f3e817afa7f22c10d3b8a8b0e66..bde80c878930f284dc537e7545fb13de1502977c 100644 --- a/modules/t/transcript.t +++ b/modules/t/transcript.t @@ -281,6 +281,15 @@ ok(@transcripts == 25); $transcriptCount = $ta->count_all_by_biotype(['protein_coding', 'pseudogene']); ok($transcriptCount == 25); + +# +# test TranscriptAdaptor::fetch_all_by_Slice +# +note("Test fetch_all_by_Slice"); +@transcripts = @{$ta->fetch_all_by_Slice($slice)}; +$transcriptCount = $ta->count_all_by_Slice($slice); +is(@transcripts, $transcriptCount, "Counted as many transcripts as were fetched from slice"); + # # test TranscriptAdaptor::fetch_all_by_source #