[Bioperl-guts-l] bioperl-live/Bio/Tools SeqStats.pm,1.22,1.23

[Heikki Lehvaslaiho]

Update of /home/repository/bioperl/bioperl-live/Bio/Tools
In directory pub.open-bio.org:/tmp/cvs-serv30016

Modified Files:
	SeqStats.pm 
Log Message:
made it possible to silence warning about ambiguous bases wih verbose() < 0


Index: SeqStats.pm
===================================================================
RCS file: /home/repository/bioperl/bioperl-live/Bio/Tools/SeqStats.pm,v
retrieving revision 1.22
retrieving revision 1.23
diff -C2 -d -r1.22 -r1.23
*** SeqStats.pm	27 Sep 2005 16:41:30 -0000	1.22
--- SeqStats.pm	28 Sep 2005 15:29:15 -0000	1.23
***************
*** 601,605 ****
  	if (!$_is_strict ) {
  		$seqobj->warn(" Sequence $seqobj contains ambiguous bases.\n".
! 		" All codons with ambiguous bases will be added together in count.\n");
  	}
  
--- 601,606 ----
  	if (!$_is_strict ) {
  		$seqobj->warn(" Sequence $seqobj contains ambiguous bases.\n".
! 		" All codons with ambiguous bases will be added together in count.\n")
!                     if $self->verbose >= 0 ;
  	}