diff options
Diffstat (limited to 'captain/gemini.f90')
-rw-r--r-- | captain/gemini.f90 | 9 |
1 files changed, 7 insertions, 2 deletions
diff --git a/captain/gemini.f90 b/captain/gemini.f90 index 8822ed5..8453db9 100644 --- a/captain/gemini.f90 +++ b/captain/gemini.f90 @@ -178,7 +178,7 @@ contains use config use iso_fortran_env use external_handling, only: external_request_gemini - use api_handling, only: api_request + use api_handling use logging, only: write_log use server_response implicit none @@ -190,6 +190,7 @@ contains integer(kind=c_long)::res type(request)::req + type(titan_request)::treq type(response)::resp ! Requested file @@ -264,7 +265,11 @@ contains call req%path_component(1, first) if(trim(first) == 'api') then - resp = api_request(request) + if(req%protocol == "gemini") then + resp = api_request_gemini(req) + else if(req%protocol == "titan") then + call treq%init_from_request(req, ssl) + end if else resp = external_request_gemini(req) end if |