summaryrefslogtreecommitdiffstats
path: root/varscan2codon.pl
diff options
context:
space:
mode:
Diffstat (limited to 'varscan2codon.pl')
-rwxr-xr-xvarscan2codon.pl2
1 files changed, 1 insertions, 1 deletions
diff --git a/varscan2codon.pl b/varscan2codon.pl
index e45da77..6352a24 100755
--- a/varscan2codon.pl
+++ b/varscan2codon.pl
@@ -57,7 +57,7 @@ while (<$variants>) {
# verify the nucleotide at $start is what's expected from the csv.
my $check_nt = substr $genome, $start+$protein_start+$offset, 1;
if ($check_nt ne $orig_nt) {
- die "$name: nucleotide at position $pos is $check_nt, but expected $orig_nt.\n";
+ print STDERR "warning: $name (line $.): nucleotide at position $pos is $check_nt, but expected $orig_nt.\n";
}
my $codon = substr $genome, $start+$protein_start, 3;