Module Email_message.Email.Simple

module Mimetype : sig ... end

type attachment_name = string

module Attachment : sig ... end

module Content : sig ... end

type t = email

include sig ... end

val sexp_of_t : t ‑> Sexplib.Sexp.t

val create : ?from:Email_address.t ‑> to_:Email_address.t list ‑> ?cc:Email_address.t list ‑> ?reply_to:Email_address.t list ‑> subject:string ‑> ?id:string ‑> ?in_reply_to:string ‑> ?date:Core.Time.t ‑> ?auto_generated:unit ‑> ?extra_headers:(Headers.Name.t * Headers.Value.t) list ‑> ?attachments:(attachment_name * Content.t) list ‑> Content.t ‑> t

val from : t ‑> Email_address.t option

val to_ : t ‑> Email_address.t list option

val cc : t ‑> Email_address.t list option

val subject : t ‑> string option

val id : t ‑> string option

val all_attachments : t ‑> Attachment.t list

val find_attachment : t ‑> attachment_name ‑> Attachment.t option

val all_related_parts : t ‑> (attachment_name * Content.t) list

val find_related : t ‑> attachment_name ‑> Content.t option

val inline_parts : t ‑> Content.t list

val map_attachments : t ‑> f:(Attachment.t ‑> t Async.Deferred.t) ‑> t Async.Deferred.t

module Expert : sig ... end