Commit c58cfd44 authored by Eugene Kulesha's avatar Eugene Kulesha
Browse files

forgot about the genes not overlapping the origin

parent ade7487a
......@@ -1459,6 +1459,9 @@ sub seq {
my $seq1 = $self->slice->subseq( $self->start, $mid_point, $self->strand);
my $seq2 = $self->slice->subseq(1, $self->end, $self->strand );
$seq = $self->strand > 0 ? "$seq1$seq2" : "$seq2$seq1";
} else {
# End this is the case for genes not overlapping the origin
$seq = $self->slice()->subseq( $self->start(), $self->end(), $self->strand() );
}
} else {
$seq = $self->slice()->subseq( $self->start(), $self->end(), $self->strand() );
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment