]> git.donarmstrong.com Git - biopieces.git/blobdiff - bp_bin/BGB_upload
removed debug message
[biopieces.git] / bp_bin / BGB_upload
index db707a927e92ce3480db1cbead931cd6f400f187..0d5415cc74632cc751b97d138d4359e99234d247 100755 (executable)
@@ -33,7 +33,7 @@ use Maasha::Common;
 use Maasha::KISS;
 use Maasha::Biopieces;
 use Maasha::Fasta;
-use Maasha::BGB::Common;
+use Maasha::BGB::Track;
 use Maasha::BGB::Wiggle;
 use Maasha::Filesys;
 
@@ -97,7 +97,7 @@ if ( $options->{ 'track_name' } )
         Maasha::Biopieces::put_record( $record, $out ) if not $options->{ "no_stream" };
     }
 
-    $num = Maasha::BGB::Common::max_track( $options->{ 'user' }, $options->{ 'clade' }, $options->{ 'genome' }, $options->{ 'assembly' } );
+    $num = Maasha::BGB::Track::max_track( $options->{ 'user' }, $options->{ 'clade' }, $options->{ 'genome' }, $options->{ 'assembly' } );
     $num = sprintf( "%04d", $num + 10 );
 
     foreach $key ( keys %fh_hash )
@@ -116,7 +116,6 @@ if ( $options->{ 'track_name' } )
             Maasha::Filesys::file_copy( "$tmp_dir/$key", "$dst_dir/track_data.kiss" );
 
             Maasha::KISS::kiss_sort( "$dst_dir/track_data.kiss" );
-            Maasha::KISS::kiss_index( "$dst_dir/track_data.kiss" );
         }
         elsif ( $options->{ 'track_type' } eq 'wiggle' )
         {