From: martinahansen <martinahansen@74ccb610-7750-0410-82ae-013aeee3265d>
Date: Thu, 20 May 2010 10:15:21 +0000 (+0000)
Subject: fixed missing SEQ_LEN in read_454
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=1ce139b812a363b40b1ce094a8b93e6df777ed99;p=biopieces.git

fixed missing SEQ_LEN in read_454

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

diff --git a/bp_bin/read_454 b/bp_bin/read_454
index 732e81d..012bc33 100755
--- a/bp_bin/read_454
+++ b/bp_bin/read_454
@@ -75,6 +75,7 @@ if ( $options->{ 'data_in' } )
         $record = {
             SEQ_NAME    => $fasta->[ 0 ],
             SEQ         => $fasta->[ 1 ],
+            SEQ_LEN     => length $fasta->[ 1 ],
             SCORES      => $qual->[ 1 ],
         };