aboutsummaryrefslogtreecommitdiff
path: root/lib/render/emit_ics.ml
diff options
context:
space:
mode:
Diffstat (limited to 'lib/render/emit_ics.ml')
-rw-r--r--lib/render/emit_ics.ml13
1 files changed, 11 insertions, 2 deletions
diff --git a/lib/render/emit_ics.ml b/lib/render/emit_ics.ml
index 4e06eae..b212930 100644
--- a/lib/render/emit_ics.ml
+++ b/lib/render/emit_ics.ml
@@ -57,9 +57,18 @@ let event b ~rite ~dtstamp d =
if iso <> "" then begin
(* [name] is the view's own resolved display string (view.ml) -- no
further fallback needed here: under [Lang.raw] it already equals
- [slug], which is what a miss used to require picking by hand. *)
+ [slug], which is what a miss used to require picking by hand.
+
+ [rank_name]/[colour_name], not the bare [rank]/[colour]: those two
+ carry the kernel's own unlocalised strings ("class-1", "white"),
+ exactly the raw-slug shape [name] itself moved away from -- SUMMARY
+ is a human-facing calendar entry, and printing "(class-1, white)"
+ beside a properly resolved name (e.g. "II classis, albus") was the
+ one field this emitter had not yet been updated to localise; the
+ JSON/CSV/XML emitters already expose both pairs and a template author
+ already has to choose the localised one deliberately. *)
let name = s d "name" in
- let summary = Printf.sprintf "%s (%s, %s)" name (s d "rank") (s d "colour") in
+ let summary = Printf.sprintf "%s (%s, %s)" name (s d "rank_name") (s d "colour_name") in
let desc =
String.concat "\n"
(List.filter (fun x -> x <> "")