fixed find_mids to locate even low q mids

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

diff --git a/bp_bin/find_mids b/bp_bin/find_mids
index 26fbbc6991a73cdab66996e2b568f3e59dd470b6..d987de13744f16ac85479741c1f59c48fa75b0fc 100755 (executable)
--- a/bp_bin/find_mids
+++ b/bp_bin/find_mids
@@ -83,8 +83,10 @@ options = bp.parse(ARGV, casts)
 
 bp.each_record do |record|
   if record.has_key? :SEQ
-    if mid_hash.has_key? record[:SEQ][4 ... 14]
-      count_hash[record[:SEQ][4 ... 14]] += 1
+    tag = record[:SEQ][4 ... 14].upcase
+
+    if mid_hash.has_key? tag
+      count_hash[tag] += 1
     end
   end
   bp.puts record