aboutsummaryrefslogtreecommitdiff
path: root/captain/response.f90
diff options
context:
space:
mode:
authorJeffrey Armstrong <jeff@approximatrix.com>2021-04-12 10:32:39 -0400
committerJeffrey Armstrong <jeff@approximatrix.com>2021-04-12 10:32:39 -0400
commitfca71fde0161a59ac650bd690a3413ffd866662d (patch)
tree72b1e6040f0b2401c358d54e1bdec9f0724a7d41 /captain/response.f90
parent025b5d1dcbb30e727afee3307d49328432bae603 (diff)
downloadlevitating-fca71fde0161a59ac650bd690a3413ffd866662d.tar.gz
levitating-fca71fde0161a59ac650bd690a3413ffd866662d.zip
URLs in instructions can now leave out the server implying download and upload from the server itself. Download and upload both work correctly.
Diffstat (limited to 'captain/response.f90')
-rw-r--r--captain/response.f902
1 files changed, 2 insertions, 0 deletions
diff --git a/captain/response.f90 b/captain/response.f90
index efa99bb..09184f9 100644
--- a/captain/response.f90
+++ b/captain/response.f90
@@ -7,6 +7,8 @@ implicit none
integer, parameter::GEMINI_CODE_REDIRECT = 30
integer, parameter::GEMINI_CODE_PERMFAIL = 50
+ character(*), parameter::RESPONSE_JSON_OKAY = '{"status": "okay"}'
+
type :: response
integer::code