Module Async_smtp.Client.Envelope_status

type envelope_id = string

type rejected_recipients = (Types.Email_address.t * Types.Reply.t) list

type ok = envelope_id * rejected_recipients

type err = [

| `Rejected_sender of Types.Reply.t

| `No_recipients of rejected_recipients

| `Rejected_sender_and_recipients of Types.Reply.t * rejected_recipients

| `Rejected_body of Types.Reply.t * rejected_recipients

]

include sig ... end

val sexp_of_err : err ‑> Sexplib.Sexp.t

type t = (ok, err) Core.Result.t

include sig ... end

val sexp_of_t : t ‑> Sexplib.Sexp.t

val to_string : t ‑> string

val ok_or_error : allow_rejected_recipients:bool ‑> t ‑> string Core.Or_error.t

val ok_exn : allow_rejected_recipients:bool ‑> t ‑> string