aboutsummaryrefslogtreecommitdiff
path: root/lib/naming/config.ml
diff options
context:
space:
mode:
Diffstat (limited to 'lib/naming/config.ml')
-rw-r--r--lib/naming/config.ml5
1 files changed, 4 insertions, 1 deletions
diff --git a/lib/naming/config.ml b/lib/naming/config.ml
index 068b40a..4077da0 100644
--- a/lib/naming/config.ml
+++ b/lib/naming/config.ml
@@ -5,6 +5,7 @@ type t = {
overlays : string list;
template : string option;
format : string option;
+ flavour : string option;
sigla_style : string option;
sigla_book : string option;
sigla_tradition : string option;
@@ -13,13 +14,14 @@ type t = {
}
let empty =
- { lang = None; overlays = []; template = None; format = None; sigla_style = None;
+ { lang = None; overlays = []; template = None; format = None; flavour = None; sigla_style = None;
sigla_book = None; sigla_tradition = None; unknown_keys = []; unknown_sections = [] }
let lang t = t.lang
let overlays t = t.overlays
let template t = t.template
let format t = t.format
+let flavour t = t.flavour
let sigla_style t = t.sigla_style
let sigla_book t = t.sigla_book
let sigla_tradition t = t.sigla_tradition
@@ -71,6 +73,7 @@ let of_string text =
| "lang" -> { acc with lang = Some v }
| "template" -> { acc with template = Some v }
| "format" -> { acc with format = Some v }
+ | "flavour" -> { acc with flavour = Some v }
| "sigla_style" -> { acc with sigla_style = Some v }
| "sigla_book" -> { acc with sigla_book = Some v }
| "sigla_tradition" -> { acc with sigla_tradition = Some v }