Up

Module Config = Server_config

Signature

module Tls : sig .. end
module Where_to_listen : sig .. end
type t = {
spool_dir
: string ;
tmp_dir
: string option ;
where_to_listen
: Where_to_listen.t list ;
max_concurrent_send_jobs
: int ;
max_concurrent_receive_jobs_per_port
: int ;
rpc_port
: int ;
malformed_emails
: [
| `Reject
| `Wrap
]		 ;
max_message_size
: Core.Std.Byte_units.t ;
tls_options
: Tls.t option ;
client
: Client_config.t ;
}
val t_of_sexp : Sexplib.Sexp.t -> t
val sexp_of_t : t -> Sexplib.Sexp.t
val client : t -> Client_config.t
val tls_options : t -> Tls.t option
val max_message_size : t -> Core.Std.Byte_units.t
val malformed_emails : t -> [
| `Reject
| `Wrap
]
val rpc_port : t -> int
val max_concurrent_receive_jobs_per_port : t -> int
val max_concurrent_send_jobs : t -> int
val where_to_listen : t -> Where_to_listen.t list
val tmp_dir : t -> string option
val spool_dir : t -> string
module Fields : sig .. end
val load_exn : string -> t Async.Std.Deferred.t
val tmp_dir : t -> string
val empty : t