From 5231a55c3ff75840890ab6b509ce3064b3399046 Mon Sep 17 00:00:00 2001 From: Jeffrey Armstrong Date: Thu, 3 Jun 2021 15:52:23 -0400 Subject: Proper server response codes are now used by the request_utils module --- captain/requtils.f90 | 6 ++---- 1 file 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 -- cgit v1.2.3