From a309c657c8a058224d49139a283f879e1ca5fed9 Mon Sep 17 00:00:00 2001 From: Simon Cruanes Date: Mon, 25 Mar 2024 14:24:17 -0400 Subject: [PATCH] fix: 1xx codes are also success --- src/core/response_code.ml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/core/response_code.ml b/src/core/response_code.ml index cc97380d..1652f564 100644 --- a/src/core/response_code.ml +++ b/src/core/response_code.ml @@ -29,4 +29,4 @@ let descr = function | 503 -> "Service unavailable" | n -> "Unknown response code " ^ string_of_int n (* TODO *) -let[@inline] is_success n = n >= 200 && n < 400 +let[@inline] is_success n = n < 400