email_message v0.15.0 · OCaml Package

type t = private Email.t

val sexp_of_t : t -> Sexplib0.Sexp.t

val of_email : Email.t -> t

val create_custom : 
  content_type:Mimetype.t ->
  ?encoding:Octet_stream.Encoding.known ->
  ?extra_headers:(string * string) list ->
  string ->
  t

val create : 
  content_type:Mimetype.t ->
  ?encoding:Octet_stream.Encoding.known ->
  ?extra_headers:(string * string) list ->
  string ->
  t

deprecated [since 2019-08] Renamed to [create_custom]

val html_utf8 : 
  ?encoding:Octet_stream.Encoding.known ->
  ?extra_headers:(string * string) list ->
  string ->
  t

val html : 
  ?encoding:Octet_stream.Encoding.known ->
  ?extra_headers:(string * string) list ->
  string ->
  t

deprecated [since 2019-08] Please specify the charset, e.g. [html_utf8]

val text_utf8 : 
  ?encoding:Octet_stream.Encoding.known ->
  ?extra_headers:(string * string) list ->
  string ->
  t

val text : 
  ?encoding:Octet_stream.Encoding.known ->
  ?extra_headers:(string * string) list ->
  string ->
  t

deprecated [since 2019-08] Please specify the charset, e.g. [text_utf8]

val text_monospace_utf8 : 
  ?extra_headers:(string * string) list ->
  ?force_no_line_wrap:bool ->
  string ->
  t

Plain text e-mail that also includes an html version so it's displayed monospace in gmail.

By default, we add some custom styling to disable the line-wrap formatting rule which gmail uses. To disable this behavior, supply ~force_no_line_wrap:false.

val text_monospace : 
  ?extra_headers:(string * string) list ->
  ?force_no_line_wrap:bool ->
  string ->
  t

deprecated [since 2019-08] Please specify the charset, e.g. [text_monospace_utf8]

val of_file : 
  ?content_type:Mimetype.t ->
  ?encoding:Octet_stream.Encoding.known ->
  ?extra_headers:(string * string) list ->
  string ->
  t Async.Deferred.t

val alternatives : ?extra_headers:(string * string) list -> t list -> t

val mixed : ?extra_headers:(string * string) list -> t list -> t

val with_related : 
  ?extra_headers:(string * string) list ->
  resources:(attachment_name * t) list ->
  t ->
  t

val content_type : t -> Mimetype.t

val related_part_cid : t -> attachment_name option

val all_related_parts : t -> (attachment_name * t) list

val find_related : t -> attachment_name -> t option

val content : t -> Octet_stream.t option

val parts : t -> t list option

val alternative_parts : t -> t list

val inline_parts : t -> t list

val to_file : t -> string -> unit Async.Deferred.Or_error.t

package email_message