diff --git a/modules/Bio/EnsEMBL/PredictionTranscript.pm b/modules/Bio/EnsEMBL/PredictionTranscript.pm index b70d951b63a9cd158b7152d6c614970adb410944..a217026ed32d3fe8767bc4928e91fb6e339eaf15 100644 --- a/modules/Bio/EnsEMBL/PredictionTranscript.pm +++ b/modules/Bio/EnsEMBL/PredictionTranscript.pm @@ -348,7 +348,7 @@ sub get_all_Exons { sub get_all_translateable_Exons { my $self = shift; - return $self->get_all_Exons; + return [ grep{ ref( $_ ) eq 'Bio::EnsEMBL::Exon' } @{$self->get_all_Exons} ]; }