removed debug message

[biopieces.git] / bp_bin / translate_seq

diff --git a/bp_bin/translate_seq b/bp_bin/translate_seq
index d62188af432c7e9a16ec152e58707901198dda82..3af052136459dd53a6d5f01b994dc324fe614752 100755 (executable)
--- a/bp_bin/translate_seq
+++ b/bp_bin/translate_seq
@@ -50,7 +50,7 @@ while ( $record = Maasha::Biopieces::get_record( $in ) )
 {
     if ( $record->{ "SEQ" } )
     {
-        if ( Maasha::Seq::seq_guess_type( $record->{ "SEQ" } ) =~ /DNA/i )
+        if ( Maasha::Seq::seq_guess_type( $record->{ "SEQ" } ) eq "DNA" )
         {
             foreach $frame ( @{ $options->{ "frames" } } )
             {