package sihl-email

You can search for identifiers within the package.

in-package search v0.2.0

package sihl-email

sihl-email
- Sihl_email
  - DevInbox
  - EnvSendGridConfig
  - EnvSmtpConfig
  - Logs
  - MakeSendGrid
    
    Config
  - MakeSmtp
    
    Config
  - Queued
    
    Email
    
    QueueService
  - SendGrid
  - SendGridConfig
  - Smtp
  - SmtpConfig
  - Template
    
    Logs
    
    Make
    
    Repo
    
    MariaDb
    
    PostgreSql

Legend:
Library
Module
Module type
Parameter
Class
Class type

include module type of struct include Sihl.Contract.Email end

type t = {

sender : string;
recipient : string;
subject : string;
text : string;
html : string option;
cc : string list;
bcc : string list;

}

val name : string

exception Exception of string

module type Sig = Sihl.Contract.Email.Sig

val to_sexp : t -> Sexplib0.Sexp.t

val pp : Format.formatter -> t -> unit

val of_yojson : Yojson__Safe.t -> t option

val to_yojson : 
  t ->
  [> `Assoc of
       (string
        * [> `List of [> `String of string ] list | `Null | `String of string ])
         list ]

val set_text : string -> t -> t

val set_html : string option -> t -> t

val create : 
  ?html:string ->
  ?cc:string list ->
  ?bcc:string list ->
  sender:string ->
  recipient:string ->
  subject:string ->
  string ->
  t

val log_src : Logs.src

module Logs : Logs.LOG

val dev_inbox : Sihl.Contract.Email.t list ref

module DevInbox : sig ... end

val print : Sihl.Contract.Email.t -> unit

val should_intercept : unit -> bool

val intercept : 
  (Sihl.Contract.Email.t -> unit Lwt.t) ->
  Sihl.Contract.Email.t ->
  unit Lwt.t

module type SmtpConfig = sig ... end

type smtp_config = {

sender : string;
username : string;
password : string;
hostname : string;
port : int option;
start_tls : bool;
ca_path : string option;
ca_cert : string option;
console : bool option;

}

val smtp_config : 
  string ->
  string ->
  string ->
  string ->
  int option ->
  bool ->
  string option ->
  string option ->
  bool option ->
  smtp_config

val smtp_schema : 
  (string,
    string ->
    string ->
    string ->
    string ->
    int option ->
    bool ->
    string option ->
    string option ->
    bool option ->
    smtp_config,
    smtp_config)
    Conformist.t

module MakeSmtp (Config : SmtpConfig) : Sihl.Contract.Email.Sig

module EnvSmtpConfig : sig ... end

module Smtp : sig ... end

module type SendGridConfig = sig ... end

type sendgrid_config = {

api_key : string;
console : bool option;

}

val sendgrid_config : string -> bool option -> sendgrid_config

val sendgrid_schema : 
  (string, string -> bool option -> sendgrid_config, sendgrid_config)
    Conformist.t

module MakeSendGrid (Config : SendGridConfig) : Sihl.Contract.Email.Sig

module EnvSendGridConfig : sig ... end

module SendGrid : sig ... end

module Queued
  (QueueService : Sihl.Contract.Queue.Sig)
  (Email : Sihl.Contract.Email.Sig) : 
  Sihl.Contract.Email.Sig

module Template : sig ... end