X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=code_perl%2FMaasha%2FUCSC%2FBED.pm;h=d689f9c6fc2682f2a03db14517e49c890085e413;hb=2e68dd027a2bc1809f53a8c24eb11269049a95fc;hp=eb8beac9522706d66c92afe41ee4e08ff54011a0;hpb=5d3ea65c9ddd26186bac044b7617a79b8f2045f7;p=biopieces.git

diff --git a/code_perl/Maasha/UCSC/BED.pm b/code_perl/Maasha/UCSC/BED.pm
index eb8beac..d689f9c 100644
--- a/code_perl/Maasha/UCSC/BED.pm
+++ b/code_perl/Maasha/UCSC/BED.pm
@@ -505,6 +505,8 @@ sub biopiece2bed
 
     if ( exists $bp_record->{ "SCORE" } ) {
         $bed_entry[ score ] = $bp_record->{ "SCORE" };
+    } elsif ( exists $bp_record->{ "BIT_SCORE" } ) {
+        $bed_entry[ score ] = $bp_record->{ "BIT_SCORE" };
     } else {
         return wantarray ? @bed_entry : \@bed_entry;
     }