my ($self, $arg) = @_;
unless($arg->isa('Bio::SeqFeature::Gene::Transcript')){
$self->throw("A Bio::SeqFeature::Gene::Transcript object needed");
}
my $transcript = $arg;
my @exons = $transcript->exons_ordered;
$self->{_converter_for_exons}->contig($self->contig);
$self->{_converter_for_exons}->analysis($self->analysis);
my $ens_exons = $self->{_converter_for_exons}->convert(\@exons);
$ens_transcript->
start($transcript->start);
$ens_transcript->end($transcript->end);
# $ens_transcript->strand($transcript->strand);
return $ens_transcript;
}