minor write_test_file() path bug fix
authorMichael Rash <mbr@cipherdyne.org>
Tue, 14 May 2013 03:11:33 +0000 (23:11 -0400)
committerMichael Rash <mbr@cipherdyne.org>
Tue, 14 May 2013 03:11:33 +0000 (23:11 -0400)
test/test-fwknop.pl

index 0aad5b9..384ffa2 100755 (executable)
@@ -5690,7 +5690,7 @@ sub file_find_regex() {
     }
 
     open F, "< $file" or
-        (&write_test_file("[-] Could not open $file: $!\n", $file) and return 0);
+        (&write_test_file("[-] Could not open $file: $!\n", $curr_test_file) and return 0);
     while (<F>) {
         push @file_lines, $_;
     }