Module Sihl_user__.Web
val user_from_token : (?ctx:'a -> 'b -> Sihl.Contract.User.t option Lwt.t) -> ?ctx:'a -> ?key:string -> (?ctx:'a -> string -> k:string -> 'b option Lwt.t) -> Sihl.Web.Request.t -> Sihl.Contract.User.t option Lwt.t
val user_from_session : (?ctx:'a -> string -> Sihl.Contract.User.t option Lwt.t) -> ?ctx:'a -> ?cookie_key:string -> ?secret:string -> ?key:string -> Opium.Request.t -> Sihl.Contract.User.t option Lwt.t