From fb7136be64188cab7db34ac3ad6c8f27098173de Mon Sep 17 00:00:00 2001 From: Jeffrey Armstrong Date: Wed, 29 Jun 2022 08:33:07 -0400 Subject: Initial work to show artifacts on job pages. --- captain/external.f90 | 8 +++++++- 1 file changed, 7 insertions(+), 1 deletion(-) (limited to 'captain/external.f90') diff --git a/captain/external.f90 b/captain/external.f90 index 07f52cb..2f7041e 100644 --- a/captain/external.f90 +++ b/captain/external.f90 @@ -1038,7 +1038,7 @@ contains end if if(associated(fullpath)) then - + ! Write the file call write_log("Storing titan file to "//trim(fullpath), LOG_DEBUG) @@ -1048,6 +1048,12 @@ contains call resp%set_body_contents(RESPONSE_JSON_OKAY) resp%body_mimetype = "text/plain" + if(req%q%has_key("job")) then + call write_log("Ok, log") + call report_upload(req) + call write_log("Upload logged?") + end if + else resp%code = GEMINI_CODE_TEMPFAIL -- cgit v1.2.3