From 3295adb9ac0e40f48b20a5c6c9d0b9c02d58351d Mon Sep 17 00:00:00 2001 From: Erik Kluzek Date: Tue, 1 Oct 2024 14:42:06 -0600 Subject: [PATCH] Correct the name of the hash to use in the checks that hash values are all set in fail, warn, and finidat tests --- bld/unit_testers/build-namelist_test.pl | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/bld/unit_testers/build-namelist_test.pl b/bld/unit_testers/build-namelist_test.pl index 421bf81b5e..096409065f 100755 --- a/bld/unit_testers/build-namelist_test.pl +++ b/bld/unit_testers/build-namelist_test.pl @@ -1376,7 +1376,7 @@ sub cat_and_create_namelistinfile { my $var; foreach $var ( "phys" , "options", "namelst" ) { - if ( not exists $failtest{$key}{$var} ) { + if ( not exists $warntest{$key}{$var} ) { die "ERROR: Subkey $var does not exist for warntest $key\nERROR:Check if you spelled $var correctly\n" } } @@ -1613,7 +1613,7 @@ sub cat_and_create_namelistinfile { my $var; foreach $var ( "phys" , "atm_forc", "res", "bgc", "crop", "use_case", "start_ymd", "namelist" ) { - if ( not exists $failtest{$key}{$var} ) { + if ( not exists $finidat_files{$key}{$var} ) { die "ERROR: Subkey $var does not exist for finidat_file $key\nERROR:Check if you spelled $var correctly\n" } }