Skip to content

Commit 25dc18a

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 b08eac0 commit 25dc18a

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
@@ -505,7 +505,7 @@ contains
505505
! process may be cleaned out to make room for new pre-process data.
506506
! In addition, the time-step folder that will contain the new grid
507507
! and initial condition data are also generated.
508-
call s_create_directory(trim(proc_rank_dir)//'/*')
508+
call s_delete_directory(trim(proc_rank_dir))
509509
call s_create_directory(trim(proc_rank_dir)//'/0')
510510
511511
end subroutine s_read_serial_ic_data_files

0 commit comments

Comments
 (0)