# HG changeset patch # User brasset_jensen # Date 1526241343 14400 # Node ID e26d3bee9348d055862d25a1956036ace21cbfd9 # Parent 36e45a7b3eff348f32f057d2a2b8670c5e247aed Uploaded diff -r 36e45a7b3eff -r e26d3bee9348 bin/align.pm --- a/bin/align.pm Sun May 13 15:53:26 2018 -0400 +++ b/bin/align.pm Sun May 13 15:55:43 2018 -0400 @@ -303,7 +303,7 @@ } else { - $number{$line[2]}->[2]++ + $number{$line[2]}->[2]++; $number{$line[2]}->[4]++ if $seq[9] eq 'A'; } if ($_ =~ /.*XM:i:(\d+).*/)