fix typo

Author: chienchi

FaQCs.pl

@@ -2320,7 +2320,7 @@ sub filter_adapter
     my @match;
     $mismatchRate = $mismatchRate*100;
     my $adapter;
-    my $adapater_count=0;
+    my $adapter_count=0;
     my $adapter_name;
     my $s_len=length($s);
     my $pos5=0;
@@ -2346,8 +2346,8 @@ sub filter_adapter
         @match = String::Approx::aslice($adapter, ["i", "S ${mismatchRate}% I 0 D 0"], $s);
         if (defined $match[0][0])
         {
-            $adapater_count++;
-            if ($adapater_count >1){
+            $adapter_count++;
+            if ($adapter_count >1){
                 last;
             }
             $adapter_name=$key;
@@ -2366,16 +2366,16 @@ sub filter_adapter
             # same adapter sencond match
             my $match = String::Approx::amatch($adapter, ["i", "S ${mismatchRate}% I 0 D 0"], $s);
             if ($match){
-                $adapater_count++;
+                $adapter_count++;
                 last;
             }
 
         }
     }
-    if ($adapater_count>1){
+    if ($adapter_count>1){
         ## filter read if there are more than one adapter (or same adapter match twice) in a read
         return (1,"",$pos5,$pos3,$adapter_name);
-    }elsif($adapater_count){
+    }elsif($adapter_count){
         return (1,$s,$pos5,$pos3,$adapter_name);
     }else{
         return (0,$s,$pos5,$pos3,"");