From ce10328e6f9986c08ba4451b3480f84f712909cd Mon Sep 17 00:00:00 2001 From: Tom Clune Date: Thu, 14 Nov 2024 10:55:23 -0500 Subject: [PATCH] Update gridcomps/Cap/MAPL_CapGridComp.F90 --- gridcomps/Cap/MAPL_CapGridComp.F90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/gridcomps/Cap/MAPL_CapGridComp.F90 b/gridcomps/Cap/MAPL_CapGridComp.F90 index a8bf1f967b62..a868c8bd3914 100644 --- a/gridcomps/Cap/MAPL_CapGridComp.F90 +++ b/gridcomps/Cap/MAPL_CapGridComp.F90 @@ -978,7 +978,7 @@ function get_vec_from_config(config, key, rc) result(vec) call ESMF_ConfigFindLabel(config, key//":", isPresent = present, _RC) if (present) then - do while(.true.) + do call ESMF_ConfigNextLine(config, tableEnd=tableEnd, _RC) if (tableEnd) exit call ESMF_ConfigGetAttribute(config, value, _RC)