]> git.donarmstrong.com Git - biopieces.git/blobdiff - bp_bin/write_kiss
removed debug message
[biopieces.git] / bp_bin / write_kiss
index dec6238ad58043e8535101743c4bbe7debf589c3..3fee688ce03636b37ed38b4b9834305665cfaab2 100755 (executable)
@@ -29,7 +29,7 @@
 use warnings;
 use strict;
 use Maasha::Biopieces;
-use Maasha::KISS::IO;
+use Maasha::KISS;
 
 
 # >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>><<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
@@ -52,8 +52,8 @@ $fh = Maasha::Biopieces::write_stream( $options->{ 'data_out' }, $options->{ 'co
 
 while ( $record = Maasha::Biopieces::get_record( $in ) ) 
 {
-    if ( $entry = Maasha::KISS::IO::biopiece2kiss( $record ) ) {
-        Maasha::KISS::IO::kiss_entry_put( $entry, $fh );
+    if ( $entry = Maasha::KISS::biopiece2kiss( $record ) ) {
+        Maasha::KISS::kiss_entry_put( $entry, $fh );
     }
 
     Maasha::Biopieces::put_record( $record, $out ) if not $options->{ 'no_stream' };