diff options
author | Jeffrey Armstrong <jeff@approximatrix.com> | 2021-06-03 15:52:23 -0400 |
---|---|---|
committer | Jeffrey Armstrong <jeff@approximatrix.com> | 2021-06-03 15:52:23 -0400 |
commit | 5231a55c3ff75840890ab6b509ce3064b3399046 (patch) | |
tree | db1985994e22692cb4254aa3e783f7a88827f698 /captain | |
parent | dd1ac41b1846e4cfbd1823af5b4503f1dc0d353c (diff) | |
download | levitating-5231a55c3ff75840890ab6b509ce3064b3399046.tar.gz levitating-5231a55c3ff75840890ab6b509ce3064b3399046.zip |
Proper server response codes are now used by the request_utils module
Diffstat (limited to 'captain')
-rw-r--r-- | captain/requtils.f90 | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/captain/requtils.f90 b/captain/requtils.f90 index df365ff..a0c42c7 100644 --- a/captain/requtils.f90 +++ b/captain/requtils.f90 @@ -36,9 +36,8 @@ implicit none contains pure function success_code(req) - use gemini_protocol, only: GEMINI_SUCCESS => STATUS_SUCCESS use http, only: HTTP_SUCCESS => HTTP_CODE_SUCCESS - use server_response, only: request + use server_response, only: request, GEMINI_SUCCESS => GEMINI_CODE_SUCCESS implicit none class(request), intent(in)::req @@ -53,9 +52,8 @@ contains end function success_code pure function notfound_code(req) - use gemini_protocol, only: GEMINI_FAIL => STATUS_PERMFAIL use http, only: HTTP_FAIL => HTTP_CODE_NOTFOUND - use server_response, only: request + use server_response, only: request, GEMINI_FAIL => GEMINI_CODE_PERMFAIL implicit none class(request), intent(in)::req |