From 65aeefb34ea5d3aefba759c500a67ea6592d3153 Mon Sep 17 00:00:00 2001
From: James Edwards <jedwards@ucar.edu>
Date: Tue, 10 Oct 2023 13:42:12 -0600
Subject: [PATCH] fix hang on abort issue

---
 cesm/driver/esmApp.F90 | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/cesm/driver/esmApp.F90 b/cesm/driver/esmApp.F90
index 12cf1537d..5215ea2aa 100644
--- a/cesm/driver/esmApp.F90
+++ b/cesm/driver/esmApp.F90
@@ -139,7 +139,7 @@ program esmApp
   ! Call Run  for the ensemble driver
   !-----------------------------------------------------------------------------
   call ESMF_GridCompRun(ensemble_driver_comp, userRc=urc, rc=rc)
-  if (ESMF_LogFoundError(rcToCheck=urc, msg=ESMF_LOGERR_PASSTHRU, &
+  if (ESMF_LogFoundError(rcToCheck=rc, msg=ESMF_LOGERR_PASSTHRU, &
        line=__LINE__, &
        file=__FILE__)) &
        call ESMF_Finalize(endflag=ESMF_END_ABORT)