diff options
Diffstat (limited to 'captain/web.f90')
-rw-r--r-- | captain/web.f90 | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/captain/web.f90 b/captain/web.f90 index c0fdbf0..a0e7a90 100644 --- a/captain/web.f90 +++ b/captain/web.f90 @@ -193,13 +193,13 @@ contains call page%assign('title', 'Jobs') !contents => generate_jobs_gemini(req) - call page%assign('contents', contents) + !call page%assign('contents', contents) else if(trim(req%location) == "/players.html") then call page%assign('title', 'Players') !contents => generate_players_gemini() - call page%assign('contents', contents) + !call page%assign('contents', contents) else if(req%location(1:9) == '/players/') then @@ -211,20 +211,20 @@ contains call page%assign('title', 'Build Instructions') !contents => generate_instructions_gemini() - call page%assign('contents', contents) + !call page%assign('contents', contents) else if(trim(first) == "instructions") then call page%assign('title', 'Build Instructions') !contents => generate_one_instuction_gemini(req) - call page%assign('contents', contents) + !call page%assign('contents', contents) else if(trim(first) == "jobs") then - call get_job_page_title(req, job_page_title) - call page%assign('title', trim(job_page_title)) + !call get_job_page_title(req, job_page_title) + !call page%assign('title', trim(job_page_title)) !contents => generate_one_job_gemini(req) - call page%assign('contents', contents) + !call page%assign('contents', contents) else @@ -268,7 +268,7 @@ contains call write_redirect(output_unit, resp%code, trim(resp%url)) case(HTTP_CODE_SUCCESS) - inquire(name=resp%body_filename, size=response_size) + inquire(file=resp%body_filename, size=response_size) call write_response_headers(output_unit, resp%code, response_size, trim(resp%body_mimetype)) call echo_file_stdout(resp%body_filename) |