package sihl
The modular functional web framework
Install
Dune Dependency
Authors
Maintainers
Sources
sihl-queue-0.1.5.tbz
sha256=bfa7bde9af02bb83d5ca39d54797b05b43317f033d93d24ca86ca42ff8ef83a1
sha512=6bb8727f65116e8042aa1fb77b3c14851ce5238f7b412adadf0f8e5b52d5310e8f06056c96bf76a82ffd7096753f49b2b0482f41e18ee1ca94310b874fe81bf9
doc/sihl.user/User/Service/Make/index.html
Module Service.Make
Source
Parameters
module Repo : Sig.REPOSITORY
Signature
include Core.Container.Service.Sig
Source
val find_all :
Core.Ctx.t ->
query:Database.Ql.t ->
(User__.Model.User.t list * Repository.Meta.t) Lwt.t
Source
val update_password :
Core.Ctx.t ->
?password_policy:(string -> (unit, string) Result.t) ->
user:User__.Model.User.t ->
old_password:string ->
new_password:string ->
new_password_confirmation:string ->
unit ->
(User__.Model.User.t, string) Result.t Lwt.t
Source
val update_details :
Core.Ctx.t ->
user:User__.Model.User.t ->
email:string ->
username:string option ->
User__.Model.User.t Lwt.t
Source
val set_password :
Core.Ctx.t ->
?password_policy:(string -> (unit, string) Result.t) ->
user:User__.Model.User.t ->
password:string ->
password_confirmation:string ->
unit ->
(User__.Model.User.t, string) Result.t Lwt.t
Set the password of a user without knowing the old password.
This feature is typically used by admins.
Source
val create_user :
Core.Ctx.t ->
email:string ->
password:string ->
username:string option ->
User__.Model.User.t Lwt.t
Create and store a user.
Source
val create_admin :
Core.Ctx.t ->
email:string ->
password:string ->
username:string option ->
User__.Model.User.t Lwt.t
Create and store a user that is also an admin.
Source
val register :
Core.Ctx.t ->
?password_policy:(string -> (unit, string) result) ->
?username:string ->
email:string ->
password:string ->
password_confirmation:string ->
unit ->
(User__.Model.User.t, string) Result.t Lwt.t
Create and store new user.
Provide password_policy
to check whether the password fulfills certain criteria.
Source
val login :
Core.Ctx.t ->
email:string ->
password:string ->
(User__.Model.User.t, string) Result.t Lwt.t
Find user by email if password matches.
sectionYPositions = computeSectionYPositions($el), 10)"
x-init="setTimeout(() => sectionYPositions = computeSectionYPositions($el), 10)"
>
On This Page