package sihl
 sectionYPositions = computeSectionYPositions($el), 10)"
  x-init="setTimeout(() => sectionYPositions = computeSectionYPositions($el), 10)"
  >
  
  
On This Page
  
  
  The modular functional web framework
Install
    
    dune-project
 Dependency
Authors
Maintainers
Sources
  
    
      sihl-0.1.1.tbz
    
    
        
    
  
  
  
    
  
  
    
  
        sha256=eac58e5ee9c869aa3b0f0bcee936b01c53bf7fe1febb42edd607268dfb11f4e9
    
    
  sha512=012b6cf1cf6af0966059761b4916ea8aa590aa8d5809a6f480cb17e23ee10c3b9245062c4f0cf9ad98ab950391c0827c9780999d39fa16a93f7aab4b12f9ab8c
    
    
  doc/sihl.user/User/Service/Make/index.html
Module Service.MakeSource
Parameters
module Log : Log.Service.Sig.SERVICEmodule CmdService : Cmd.Service.Sig.SERVICEmodule DbService : Data.Db.Service.Sig.SERVICEmodule Repo : Sig.REPOSITORYSignature
include Core.Container.SERVICE
Source
val find_all : 
  Core.Ctx.t ->
  query:Data.Ql.t ->
  (User__.User_core.User.t list * Data.Repo.Meta.t) Lwt.tSource
val update_password : 
  Core.Ctx.t ->
  ?password_policy:(string -> (unit, string) Result.t) ->
  user:User__.User_core.User.t ->
  old_password:string ->
  new_password:string ->
  new_password_confirmation:string ->
  unit ->
  (User__.User_core.User.t, string) Result.t Lwt.tSource
val update_details : 
  Core.Ctx.t ->
  user:User__.User_core.User.t ->
  email:string ->
  username:string option ->
  User__.User_core.User.t Lwt.tSource
val set_password : 
  Core.Ctx.t ->
  ?password_policy:(string -> (unit, string) Result.t) ->
  user:User__.User_core.User.t ->
  password:string ->
  password_confirmation:string ->
  unit ->
  (User__.User_core.User.t, string) Result.t Lwt.tSet 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__.User_core.User.t Lwt.tCreate and store a user.
Source
val create_admin : 
  Core.Ctx.t ->
  email:string ->
  password:string ->
  username:string option ->
  User__.User_core.User.t Lwt.tCreate 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__.User_core.User.t, string) Result.t Lwt.tCreate 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__.User_core.User.t, string) Result.t Lwt.tFind user by email if password matches.
 sectionYPositions = computeSectionYPositions($el), 10)"
  x-init="setTimeout(() => sectionYPositions = computeSectionYPositions($el), 10)"
  >
  
  
  On This Page