Module Webs_kit.Res

Resource oriented combinators.

val allow : Webs.Http.meth list -> Webs.Req.t -> (Webs.Req.tWebs.Resp.t) Stdlib.result

allow ms req is:

  • Ok req if List.mem (Req.meth r) ms
  • An empty 405 Error _ not allowed response, otherwise.