package sihl-web

  1. Overview
  2. Docs
val log_src : Logs.src
module Logs : Logs.LOG
type credentials = {
  1. email : string;
  2. password : string;
}
val credentials_of_sexp : Sexplib0.Sexp.t -> credentials
val sexp_of_credentials : credentials -> Sexplib0.Sexp.t
val login : email:string -> password:string -> Opium.Response.t -> Opium.Response.t
val default_site_error_handler : 'a -> Opium.Response.t Lwt.t
val session_middleware : ?key:string -> ?error_handler:(Sihl_contract__User.error -> Opium.Response.t Lwt.t) -> unit -> Rock.Middleware.t
val default_json_error_handler : 'a -> Opium.Response.t Lwt.t
val token_middleware : ?key:string -> ?error_handler:(Sihl_contract__User.error -> Opium.Response.t Lwt.t) -> unit -> Rock.Middleware.t