module Envelope_status = Client.Envelope_statusmodule Expert : sig ... endinclude module type of Email_message.Std.Email.Simple with module Simple.Expert := Email_message.Std.Email.Simple.Expertmodule Mimetype = Email_message.Email.Simple.Mimetypemodule Attachment = Email_message.Email.Simple.Attachmentmodule Content = Email_message.Email.Simple.Contentinclude sig ... endval sexp_of_t : t ‑> Sexplib.Sexp.tval create : ?from:Email_message.Email_address.t ‑> to_:Email_message.Email_address.t list ‑> ?cc:Email_message.Email_address.t list ‑> ?reply_to:Email_message.Email_address.t list ‑> subject:string ‑> ?id:string ‑> ?in_reply_to:string ‑> ?date:Core.Time.t ‑> ?auto_generated:unit ‑> ?extra_headers:(Email_message.Headers.Name.t * Email_message.Headers.Value.t) list ‑> ?attachments:(attachment_name * Content.t) list ‑> Content.t ‑> tval from : t ‑> Email_message.Email_address.t optionval to_ : t ‑> Email_message.Email_address.t list optionval cc : t ‑> Email_message.Email_address.t list optionval subject : t ‑> string optionval id : t ‑> string optionval all_attachments : t ‑> Attachment.t listval find_attachment : t ‑> attachment_name ‑> Attachment.t optionval map_attachments : t ‑> f:(Attachment.t ‑> t Async.Deferred.t) ‑> t Async.Deferred.tmodule Expert = Email_message.Email.Simple.Expertval send' : ?log:Mail_log.t ‑> ?server:Core.Host_and_port.t ‑> ?from:Types.Email_address.t ‑> ?sender_args:Types.Argument.t list ‑> to_:Types.Email_address.t list ‑> ?cc:Types.Email_address.t list ‑> ?bcc:Types.Email_address.t list ‑> ?reply_to:Types.Email_address.t list ‑> subject:string ‑> ?id:string ‑> ?in_reply_to:string ‑> ?date:Core.Time.t ‑> ?auto_generated:unit ‑> ?extra_headers:(Email_message.Std.Email_headers.Name.t * Email_message.Std.Email_headers.Value.t) list ‑> ?attachments:(attachment_name * Email_message.Std.Email.Simple.Content.t) list ‑> Email_message.Std.Email.Simple.Content.t ‑> Envelope_status.t Async.Deferred.Or_error.tval send : ?log:Mail_log.t ‑> ?server:Core.Host_and_port.t ‑> ?from:Types.Email_address.t ‑> ?sender_args:Types.Argument.t list ‑> to_:Types.Email_address.t list ‑> ?cc:Types.Email_address.t list ‑> ?bcc:Types.Email_address.t list ‑> ?reply_to:Types.Email_address.t list ‑> subject:string ‑> ?id:string ‑> ?in_reply_to:string ‑> ?date:Core.Time.t ‑> ?auto_generated:unit ‑> ?extra_headers:(Email_message.Std.Email_headers.Name.t * Email_message.Std.Email_headers.Value.t) list ‑> ?attachments:(attachment_name * Email_message.Std.Email.Simple.Content.t) list ‑> Email_message.Std.Email.Simple.Content.t ‑> unit Async.Deferred.Or_error.t