Module Async_smtp.Mail_log.Mail_fingerprint

type t = {
headers : (string * string) list;
md5 : string option;
parts : t list;
}
include sig ... end
val parts : t ‑> t list
val md5 : t ‑> string option
val headers : t ‑> (string * string) list
module Fields : sig ... end
val t_of_sexp : Sexplib.Sexp.t ‑> t
val sexp_of_t : t ‑> Sexplib.Sexp.t
val of_email : Email_message.Std.Email.t ‑> t