diff --git a/modules/t/transcript.t b/modules/t/transcript.t
index 419132a81eef2d1427c3e4f705a6bb312401bd2a..f4e546019fef1f3e817afa7f22c10d3b8a8b0e66 100644
--- a/modules/t/transcript.t
+++ b/modules/t/transcript.t
@@ -273,16 +273,19 @@ ok($tr->display_id() eq $tr->stable_id());
 note("Test fetch_all_by_biotype");
 my @transcripts = @{$ta->fetch_all_by_biotype('protein_coding')};
 ok(@transcripts == 25);
+my $transcriptCount = $ta->count_all_by_biotype('protein_coding');
+ok($transcriptCount == 25);
 @transcripts = @{$ta->fetch_all_by_biotype(['protein_coding','pseudogene'])};
 note "Got ".scalar(@transcripts)." transcripts\n";
 ok(@transcripts == 25);
-my $transcriptCount;
+$transcriptCount = $ta->count_all_by_biotype(['protein_coding', 'pseudogene']);
+ok($transcriptCount == 25);
 
 #
 # test TranscriptAdaptor::fetch_all_by_source
 #
 note("Test fetch_all_by_source");
-my @transcripts = @{$ta->fetch_all_by_source('ensembl')};
+@transcripts = @{$ta->fetch_all_by_source('ensembl')};
 note "Got ".scalar(@transcripts)." ensembl transcripts\n";
 ok(@transcripts == 21);
 $transcriptCount = $ta->count_all_by_source('ensembl');