diff --git a/src/yaml/yaml_settings.F90 b/src/yaml/yaml_settings.F90 index bf02302c..6b2dd04b 100644 --- a/src/yaml/yaml_settings.F90 +++ b/src/yaml/yaml_settings.F90 @@ -314,8 +314,8 @@ function get_path(self, include_file) result(path) path = '' value => self do while (associated(value)) - if (allocated(value%path)) then - if (len(value%path) > 0 .and. include_file_) then + if (allocated(value%path) .and. include_file_) then + if (len(value%path) > 0) then path = value%path // ':' // path return end if