[Bioperl-guts-l] [14829] bioperl-live/trunk/Bio/Align/DNAStatistics.pm: _build_nt_matrix() now uses $self-> warn rather than straight print to report on ambiguous residues ( suggested by Dominic Rose on the bioperl mailing list)

[Heikki Lehvaslaiho]

Revision: 14829
Author:   heikki
Date:     2008-08-27 02:19:17 -0400 (Wed, 27 Aug 2008)

Log Message:
-----------
 _build_nt_matrix() now uses $self->warn rather than straight print to report on ambiguous residues (suggested by Dominic Rose on the bioperl mailing list)

Modified Paths:
--------------
    bioperl-live/trunk/Bio/Align/DNAStatistics.pm

Modified: bioperl-live/trunk/Bio/Align/DNAStatistics.pm
===================================================================
--- bioperl-live/trunk/Bio/Align/DNAStatistics.pm	2008-08-26 18:39:25 UTC (rev 14828)
+++ bioperl-live/trunk/Bio/Align/DNAStatistics.pm	2008-08-27 06:19:17 UTC (rev 14829)
@@ -1102,7 +1102,7 @@
 	my $tj_index = $NucleotideIndexes{$tj};	    
 
 	if( ! defined $ti_index ) {
-	    print "ti_index not defined for $ti\n";
+	    $self->warn("ti_index not defined for $ti\n");
 	    next;
 	}