[Bioperl-l] Change in BioPerl module

[Filipe Garrett]

Hi all,

I'm using Bioperl v1.4 and at the "SimpleAlign.pm" module I think that a
minor change could be made to the "gap_line" function in order to use
the gap character (defined in $self->gap_char) and not '-'.

change line 1228 to =>	my $gap= ($refchar eq $self->gap_char);

change line 1230 to =>	$gap= 1 if( $seq->[$pos] eq $self->gap_char);


What do you think?
Thanks,
FG