Module MrMime_resent (.ml)

module MrMime_resent: sig .. end

type field = Rfc5322.resent

type resent = {

	`date : MrMime_date.date option;`
	`from : MrMime_address.mailbox list;`
	`sender : MrMime_address.mailbox option;`
	`to' : MrMime_address.address list;`
	`cc : MrMime_address.address list;`
	`bcc : MrMime_address.address list;`
	`msg_id : MrMime_msgID.msg_id option;`
	`reply_to : MrMime_address.address list;`

}

val default : resent

module Date: MrMime_date

module Address: MrMime_address

module MsgID: MrMime_msgID

val pp : Format.formatter -> 'a -> unit

module Encoder: sig .. end

val decoder : ([> field ] as 'a) list ->
       (resent list * 'a list) Parser.t

val equal : 'a -> 'a -> bool