From: martinahansen <martinahansen@74ccb610-7750-0410-82ae-013aeee3265d>
Date: Tue, 23 Sep 2008 05:09:10 +0000 (+0000)
Subject: backup time
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=48e4e38881e71981c5b78e28de19e8e72eca342e;p=biopieces.git

backup time

git-svn-id: http://biopieces.googlecode.com/svn/trunk@263 74ccb610-7750-0410-82ae-013aeee3265d
---

diff --git a/code_perl/Maasha/Solexa.pm b/code_perl/Maasha/Solexa.pm
index 0fe7f10..d7c0d75 100644
--- a/code_perl/Maasha/Solexa.pm
+++ b/code_perl/Maasha/Solexa.pm
@@ -168,11 +168,11 @@ sub solexa2biopiece
         $seqs[ $i ] = lc $seqs[ $i ] if $scores[ $i ] < $quality;
     }
 
-    $record{ "SEQ_NAME" }     = $entry->[ SEQ_NAME ];
-    $record{ "SEQ" }          = $entry->[ SEQ ];
-    $record{ "SCORES" }       = $entry->[ SCORE ];
-    $record{ "SEQ_LEN" }      = scalar @seqs;
-    $record{ "SCORE_MEAN" }   = sprintf ( "%.2f", Maasha::Calc::mean( \@scores ) );
+    $record{ "SEQ_NAME" }   = $entry->[ SEQ_NAME ];
+    $record{ "SEQ" }        = $entry->[ SEQ ];
+    $record{ "SCORES" }     = $entry->[ SCORE ];
+    $record{ "SEQ_LEN" }    = scalar @seqs;
+    $record{ "SCORE_MEAN" } = sprintf ( "%.2f", Maasha::Calc::mean( \@scores ) );
 
     return wantarray ? %record : \%record;
 }