diff --git a/src/SIS_restart.F90 b/src/SIS_restart.F90 index 1986e05b..b1c6cf63 100644 --- a/src/SIS_restart.F90 +++ b/src/SIS_restart.F90 @@ -277,7 +277,7 @@ function open_restart_units(filename, directory, G, CS, IO_handles, file_paths, endif enddo ! while (start_char < len_trim(filename)) loop - write(count_msg, '(I)') nf + write(count_msg, '(I0)') nf call SIS_mesg("SIS2: open_restart_units found "//trim(count_msg)//" files using "//& trim(filename)//" in directory "//trim(directory))