diff options
Diffstat (limited to 'lib/rites/rite_ef/rite_ef.ml')
| -rw-r--r-- | lib/rites/rite_ef/rite_ef.ml | 13 |
1 files changed, 11 insertions, 2 deletions
diff --git a/lib/rites/rite_ef/rite_ef.ml b/lib/rites/rite_ef/rite_ef.ml index 4cf52a6..ded960b 100644 --- a/lib/rites/rite_ef/rite_ef.ml +++ b/lib/rites/rite_ef/rite_ef.ml @@ -11,7 +11,16 @@ module Lectionary_ef = Lectionary_ef open Colitur_kernel -let context : (Vocab_ef.season, Vocab_ef.rank) Rite.t = +(* [~lectionary], not a value closed over an internal load: fix round 1 + (coordinator review) found the previous version -- [context] as a plain + value, [Lectionary_ef] loading data/ef/lectionary.sexp as a side effect + of being linked -- made `colitur easter <year>` (no lectionary data + touched at all) die at startup the moment that file was absent from a + bare `dune build`'s own default target. A function mirrors how the + sanctoral [Layer.t] already travels: caller-supplied, not embedded (see + this module's own .mli doc comment on [context] for the fuller + rationale, shared with data/ef/sanctoral.sexp). *) +let context ~lectionary : (Vocab_ef.season, Vocab_ef.rank) Rite.t = { Rite.id = Temporal_ef.id; vocab = Vocab_ef.vocab; year_start = Temporal_ef.year_start; @@ -23,4 +32,4 @@ let context : (Vocab_ef.season, Vocab_ef.rank) Rite.t = admit = Precedence_ef.admit }; season_runs = Vocab_ef.seasons; transfer_target = Precedence_ef.transfer_target; - readings = Lectionary_ef.readings } + readings = Lectionary_ef.readings ~lectionary } |