X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=bp_bin%2Fwrite_bed;h=5b1e1564934599c7cc475e075bdede71139f8f26;hb=5de6112b70b59420b245ce636a8b2e3c90acbe00;hp=3b486fd050419accd35163851b6b04983db5f268;hpb=5aed4676ad1bf35abbade6215ac90ee591e6d8fe;p=biopieces.git

diff --git a/bp_bin/write_bed b/bp_bin/write_bed
index 3b486fd..5b1e156 100755
--- a/bp_bin/write_bed
+++ b/bp_bin/write_bed
@@ -26,6 +26,7 @@
 # >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>><<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
 
 
+use warnings;
 use strict;
 use Maasha::Biopieces;
 use Maasha::UCSC::BED;
@@ -53,8 +54,6 @@ $fh = Maasha::Biopieces::write_stream( $options->{ 'data_out' }, $options->{ 'co
 
 while ( $record = Maasha::Biopieces::get_record( $in ) ) 
 {
-    $record = Maasha::UCSC::psl2record( $record ) if $record->{ 'tBaseInsert' }; # Dirty addition to allow Affy data from MySQL to be dumped
-
     if ( $bed_entry = Maasha::UCSC::BED::biopiece2bed( $record, $options->{ 'cols' } ) ) {
         Maasha::UCSC::BED::bed_entry_put( $bed_entry, $fh, $options->{ 'cols' }, $options->{ 'check' } );
     }