fixed missing qual trimming in remove_mids

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

diff --git a/bp_bin/remove_mids b/bp_bin/remove_mids
index aee66e48410d609dcd5682d3d3d8c99a8d185c43..c42a6c0d6cdda5f5f448450065d50faad028de2a 100755 (executable)
--- a/bp_bin/remove_mids
+++ b/bp_bin/remove_mids
@@ -91,6 +91,7 @@ bp.each_record do |record|
 
     if mid_hash[tag]
       record[:SEQ]     = record[:SEQ][pos + MID_LEN ... record[:SEQ].length]
+      record[:SCORES]  = record[:SCORES][pos + MID_LEN ... record[:SCORES].length] if record[:SCORES]
       record[:MID]     = tag
       record[:MID_NUM] = mid_hash[tag] + 1
       record[:SEQ_LEN] = record[:SEQ].length