X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=bp_bin%2Fwrite_kiss;h=3fee688ce03636b37ed38b4b9834305665cfaab2;hb=5de6112b70b59420b245ce636a8b2e3c90acbe00;hp=dec6238ad58043e8535101743c4bbe7debf589c3;hpb=e481c33c8674058258da9b5f2ff9165a78d6c65a;p=biopieces.git

diff --git a/bp_bin/write_kiss b/bp_bin/write_kiss
index dec6238..3fee688 100755
--- a/bp_bin/write_kiss
+++ b/bp_bin/write_kiss
@@ -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' };