[Bioperl-guts-l] bioperl-live/Bio/AlignIO fasta.pm,1.23,1.24

[Christopher John Fields]

Update of /home/repository/bioperl/bioperl-live/Bio/AlignIO
In directory dev.open-bio.org:/tmp/cvs-serv28698

Modified Files:
	fasta.pm 
Log Message:
Bug 1958; made '?' ambiguous to prevent removal from sequences (was adding trailing gaps)

Index: fasta.pm
===================================================================
RCS file: /home/repository/bioperl/bioperl-live/Bio/AlignIO/fasta.pm,v
retrieving revision 1.23
retrieving revision 1.24
diff -C2 -d -r1.23 -r1.24
*** fasta.pm	17 Mar 2006 01:52:23 -0000	1.23
--- fasta.pm	10 Apr 2006 03:52:05 -0000	1.24
***************
*** 56,60 ****
  @ISA = qw(Bio::AlignIO);
  
! $MATCHPATTERN = '^A-Za-z\.\-\*';
  $WIDTH = 60;
  
--- 56,60 ----
  @ISA = qw(Bio::AlignIO);
  
! $MATCHPATTERN = '^A-Za-z\.\-\*\?';
  $WIDTH = 60;