From: martinahansen <martinahansen@74ccb610-7750-0410-82ae-013aeee3265d>
Date: Mon, 27 Oct 2008 02:44:50 +0000 (+0000)
Subject: changed delimiter in REC_TYPE SOLID to ;
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=aecaf0f8a879a9d2f7aafadc56224eb813b50f55;p=biopieces.git

changed delimiter in REC_TYPE SOLID to ;

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

diff --git a/code_perl/Maasha/Biopieces.pm b/code_perl/Maasha/Biopieces.pm
index f7ec3ae..98ea242 100644
--- a/code_perl/Maasha/Biopieces.pm
+++ b/code_perl/Maasha/Biopieces.pm
@@ -2022,7 +2022,7 @@ sub script_read_solid
                 REC_TYPE   => 'SOLID',
                 SEQ_NAME   => $seq_name,
                 SEQ_CS     => $seq_cs,
-                SEQ_QUAL   => $seq_qual,
+                SEQ_QUAL   => join( ";", @scores ),
                 SEQ_LEN    => length $seq_cs,
                 SEQ        => join( "", @seqs ),
                 SCORE_MEAN => sprintf( "%.2f", Maasha::Calc::mean( \@scores ) ),