diff --git a/src/fpm/git.f90 b/src/fpm/git.f90 index 972d284b1b..2baa266fa6 100644 --- a/src/fpm/git.f90 +++ b/src/fpm/git.f90 @@ -451,7 +451,7 @@ subroutine git_archive(source, destination, ref, additional_files, verbose, erro end if allocate(character(len=0) :: add_files) - if (present(additional_files) then + if (present(additional_files)) then do i=1,size(additional_files) add_files = trim(add_files)//' --add-file='//adjustl(additional_files(i)) end do