Correct the name of the hash to use in the checks that hash values ar…

…e all set in fail, warn, and finidat tests
mvdebolskiy · Oct 1, 2024 · 3295adb · 3295adb
1 parent 5173018
commit 3295adb
Showing 1 changed file with 2 additions and 2 deletions.
diff --git 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"
       }
    }