diff --git a/gridcomps/History/MAPL_HistoryGridComp.F90 b/gridcomps/History/MAPL_HistoryGridComp.F90
index 0749da2c0411..4eaf29f21c46 100644
--- a/gridcomps/History/MAPL_HistoryGridComp.F90
+++ b/gridcomps/History/MAPL_HistoryGridComp.F90
@@ -2204,10 +2204,6 @@ subroutine Initialize ( gc, import, dumexport, clock, rc )
                AVGINT  = MAPL_nsecf( list(n)%frequency )
                call ESMF_AttributeSet(F_extra, NAME='REFRESH_INTERVAL', VALUE=REFRESH, _RC)
                call ESMF_AttributeSet(F_extra, NAME='AVERAGING_INTERVAL', VALUE=AVGINT, _RC)
-               block
-                  character(len=128) :: ffname
-                  call ESMF_FieldGet(f_extra,name=ffname)
-               end block
                call MAPL_StateAdd(IntState%GIM(N), f_extra, _RC)
 
             endif