From 043d499162d97e3841fef48d00fad0448b6f7653 Mon Sep 17 00:00:00 2001 From: albapa Date: Sat, 17 Aug 2024 09:35:27 +0100 Subject: [PATCH] workaround for FoX bug: remove newlines when reading in a config file (#89) --- gap_fit_module.f95 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/gap_fit_module.f95 b/gap_fit_module.f95 index 047333c6..3a6349b9 100644 --- a/gap_fit_module.f95 +++ b/gap_fit_module.f95 @@ -232,7 +232,7 @@ subroutine gap_fit_parse_command_line(this) if (has_config_file) then inquire(file=config_file, exist=file_exists) if (.not. file_exists) call system_abort("Config file does not exist: "//config_file) - call read(this%config_string, config_file, keep_lf=.true., mpi_comm=this%mpi_obj%communicator, mpi_id=this%mpi_obj%my_proc) + call read(this%config_string, config_file, keep_lf=.false., mpi_comm=this%mpi_obj%communicator, mpi_id=this%mpi_obj%my_proc) end if end if if (.not. has_config_file) this%config_string = this%command_line