Merge branch '1594.fix' into testing_branch

uramirez8707 · Jan 8, 2025 · 28c9fc2 · 28c9fc2
2 parents 6677e06 + 162aa9c
commit 28c9fc2
Showing 1 changed file with 3 additions and 2 deletions.
diff --git a/diag_manager/fms_diag_object.F90 b/diag_manager/fms_diag_object.F90
@@ -898,8 +898,9 @@ subroutine fms_diag_do_io(this, end_time)
       call diag_file%flush_diag_file()
       call diag_file%update_next_write(model_time)
       call diag_file%update_current_new_file_freq_index(model_time)
-      if (diag_file%is_time_to_close_file(model_time, force_write)) call diag_file%close_diag_file(this%FMS_diag_output_buffers, &
-        this%model_end_time, diag_fields = this%FMS_diag_fields)
+      if (diag_file%is_time_to_close_file(model_time, force_write)) &
+        call diag_file%close_diag_file(this%FMS_diag_output_buffers, &
+          this%model_end_time, diag_fields = this%FMS_diag_fields)
     else if (force_write) then
       call diag_file%prepare_for_force_write()
       call diag_file%write_time_data()