use jsont for alt_unit_names

This commit is contained in:
swrup 2025-12-22 19:20:32 +01:00
parent 99d2ee6194
commit 7b8edd05e9
3 changed files with 29 additions and 42 deletions

View file

@ -14,7 +14,7 @@ let mk_keys ~db_conn ~sm ~last_issue_date =
let currency_specification =
let v = Config.Currency.v in
let alt_unit_names =
Parse_config.Alt_unit_names.to_json_string v.alt_unit_names
Parse_config.Alt_unit_names.encode_exn v.alt_unit_names
in
CurrencySpecification.
{