From eab2a5ccd524e8895c38c35695d8aedc90bd0684 Mon Sep 17 00:00:00 2001 From: Ewan Birney <birney@sanger.ac.uk> Date: Thu, 21 Feb 2002 15:48:45 +0000 Subject: [PATCH] fixes when arne was looking over my shoulder!! --- modules/Bio/EnsEMBL/Transcript.pm | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/modules/Bio/EnsEMBL/Transcript.pm b/modules/Bio/EnsEMBL/Transcript.pm index 967b23c01d..bde9cdb2c4 100755 --- a/modules/Bio/EnsEMBL/Transcript.pm +++ b/modules/Bio/EnsEMBL/Transcript.pm @@ -1214,7 +1214,7 @@ sub convert_peptide_coordinate_to_contig { # move start end into translate cDNA coordinates now. # much easier! - $start = 3* $start; + $start = 3* $start-2; $end = 3* $end; if( !defined $self->translation ) { @@ -1241,7 +1241,7 @@ sub convert_peptide_coordinate_to_contig { my $exon; while( $exon = shift @exons && $start < $trans_len + $current_len_exon ) { - ; + $trans_len += $exon->length(); } unshift(@exons,$exon); @@ -1263,7 +1263,7 @@ sub convert_peptide_coordinate_to_contig { } else { $end_in_exon = $exon->length; } - + $offset_into_exon = 0; # the main reason for make this an attribute of the exon is to handle stickies push(@out,$exon->contig_seqfeatures_from_relative_position($start_in_exon,$end_in_exon)); -- GitLab