this repo has no description
anil.recoil.org
1(*---------------------------------------------------------------------------
2 Copyright (c) 2025 Anil Madhavapeddy. All rights reserved.
3 SPDX-License-Identifier: ISC
4 ---------------------------------------------------------------------------*)
5
6(** VacationResponse type as defined in RFC 8621 Section 8
7
8 @canonical Jmap.Proto.Vacation *)
9
10type t = {
11 id : Proto_id.t;
12 (** Always "singleton" - there is only one vacation response. *)
13 is_enabled : bool;
14 (** Whether the vacation response is active. *)
15 from_date : Ptime.t option;
16 (** When to start sending responses. *)
17 to_date : Ptime.t option;
18 (** When to stop sending responses. *)
19 subject : string option;
20 (** Subject for the auto-reply. *)
21 text_body : string option;
22 (** Plain text body. *)
23 html_body : string option;
24 (** HTML body. *)
25}
26
27val id : t -> Proto_id.t
28val is_enabled : t -> bool
29val from_date : t -> Ptime.t option
30val to_date : t -> Ptime.t option
31val subject : t -> string option
32val text_body : t -> string option
33val html_body : t -> string option
34
35val jsont : t Jsont.t
36
37(** The singleton id for VacationResponse. *)
38val singleton_id : Proto_id.t