From f5a983f92653d7aa6984bb7306c541b70dda079e Mon Sep 17 00:00:00 2001 From: Michele Guerini Rocco Date: Thu, 14 Sep 2023 11:00:56 +0200 Subject: [PATCH] src/ini_parser.f90: open file for reading --- src/ini_parser.f90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/ini_parser.f90 b/src/ini_parser.f90 index 0e15a70..6eb725a 100644 --- a/src/ini_parser.f90 +++ b/src/ini_parser.f90 @@ -75,7 +75,7 @@ contains ! open the INI file ini = get_free_unit() - open(unit=ini, file=filepath, iostat=error) + open(unit=ini, file=filepath, action='read', iostat=error) if (error /= 0) then write (msg, '("failed to open INI file: ", a)') filepath call log_error(msg, proc='parse_ini', mod='ini_parser')