Up

module Spool

: sig
#
val msgid : Async_smtp.Std.Smtp_spool.Spooled_message_id.t Common.Command.Spec.Arg_type.t
#
val format : [
| `Ascii_table
| `Ascii_table_with_max_width of int
| `Exim
| `Sexp
] Common.Command.Spec.Arg_type.t
#
val status : format:[
| `Ascii_table
| `Ascii_table_with_max_width of int
| `Exim
| `Sexp
] -> Async.Std.Rpc.Connection.t -> unit Async.Std.Deferred.t
#
val count : Async.Std.Rpc.Connection.t -> unit Async.Std.Deferred.t
#
val set_max_send_jobs : num:int -> Async.Std.Rpc.Connection.t -> unit Async.Std.Deferred.t
#
val freeze : msgid:Async_smtp.Std.Smtp_spool.Spooled_message_id.t -> Async.Std.Rpc.Connection.t -> unit Async.Std.Deferred.t
#
val send_now : ?retry_intervals:Core.Std.Time.Span.t list -> msgid:Async_smtp.Std.Smtp_spool.Spooled_message_id.t -> Async.Std.Rpc.Connection.t -> unit Async.Std.Deferred.t
#
val events : Async.Std.Rpc.Connection.t -> unit Async.Std.Deferred.t
#
val command : Common.Command.t
end