Skip to content

Commit 456032c

Browse files
sbryngelsonclaude
andcommitted
Fix s_create_directory called with /* wildcard creating junk directory
Co-Authored-By: Claude Opus 4.6 <noreply@anthropic.com>
1 parent 4ff0bef commit 456032c

1 file changed

Lines changed: 1 addition & 1 deletion

File tree

src/pre_process/m_start_up.fpp

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -506,7 +506,7 @@ contains
506506
! process may be cleaned out to make room for new pre-process data.
507507
! In addition, the time-step folder that will contain the new grid
508508
! and initial condition data are also generated.
509-
call s_create_directory(trim(proc_rank_dir)//'/*')
509+
call s_delete_directory(trim(proc_rank_dir))
510510
call s_create_directory(trim(proc_rank_dir)//'/0')
511511
512512
end subroutine s_read_serial_ic_data_files

0 commit comments

Comments
 (0)