diff --git a/modules/Bio/EnsEMBL/DB/VirtualContig.pm b/modules/Bio/EnsEMBL/DB/VirtualContig.pm index c5732e0a8f1fbdb349f8c05a91b676655031985c..bd12a3413df84d7a982acb1e26e5bae004835012 100755 --- a/modules/Bio/EnsEMBL/DB/VirtualContig.pm +++ b/modules/Bio/EnsEMBL/DB/VirtualContig.pm @@ -168,22 +168,15 @@ sub extend { if (! defined $left || ! defined $right ){ $self->throw("Must supply a left and right value when extending a VirtualContig"); } - - - my $current_left = $self->_left_size; - my $current_right = $self->_right_size; - my $current_ori = $self->_focus_orientation; - my $current_focuscontig = $self->_focus_contig; - my $current_focusposition = $self->_focus_position; - - print STDERR "Extending raw contig ".$current_focuscontig->id." (ori = $current_ori)\n"; - - my $nvc = Bio::EnsEMBL::DB::VirtualContig->new( -focuscontig => $current_focuscontig, - -focusposition => $current_focusposition, - -ori => $current_ori, - -left => $current_left - $left, - -right => $current_right + $right, - ); + + print STDERR "Extending raw contig ".$self->_focus_contig->id." (ori = $self->_focus_orientation)\n"; + + my $nvc = Bio::EnsEMBL::DB::VirtualContig->new( -focuscontig => $self->_focus_contig, + -focusposition => $self->_focus_position, + -ori => $self->_focus_orientation, + -left => $self->_left_size - $left, + -right => $self->_right_size + $right, + ); return $nvc; }