From 80416b3039f53b04b69f1d59f529f09f875bf83b Mon Sep 17 00:00:00 2001
From: Brian Cully <bjc@spork.org>
Date: Fri, 19 Jan 2024 20:33:53 -0500
Subject: fix error message when opening variants file

---
 varscan2codon.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/varscan2codon.pl b/varscan2codon.pl
index 6352a24..284848d 100755
--- a/varscan2codon.pl
+++ b/varscan2codon.pl
@@ -30,7 +30,7 @@ while (<$proteins>) {
 }
 
 my $variants = IO::File->new($ARGV[2])
-    or die "Couldn't open $ARGV[1] for reading: $!\n";
+    or die "Couldn't open $ARGV[2] for reading: $!\n";
 my $name = 'unnamed-change';
 while (<$variants>) {
     chomp;
-- 
cgit v1.2.3