diff options
Diffstat (limited to 'captain/response.f90')
-rw-r--r-- | captain/response.f90 | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/captain/response.f90 b/captain/response.f90 index 748dd39..e743d0d 100644 --- a/captain/response.f90 +++ b/captain/response.f90 @@ -396,6 +396,7 @@ contains end subroutine request_destroy subroutine response_destroy(resp) + use utilities, only: delete_file implicit none class(response)::resp @@ -410,7 +411,7 @@ contains if(associated(resp%body_filename)) then if(resp%temporary_file) then - call unlink(resp%body_filename) + call delete_file(resp%body_filename) end if deallocate(resp%body_filename) end if |