From 128177eb76518b72a63372b5d4929dd297fb359d Mon Sep 17 00:00:00 2001 From: swrup Date: Sat, 6 Dec 2025 16:54:53 +0100 Subject: [PATCH] --- src/api.ml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/api.ml b/src/api.ml index 81e2ba7f..01e37c8b 100644 --- a/src/api.ml +++ b/src/api.ml @@ -1014,7 +1014,7 @@ module DenomGroup = struct let rsa = Case.map "RSA" RsaDenomGroup.jsont ~dec:of_rsa in let enc_case = function Rsa v -> Case.value rsa v in let cases = Case.[ make rsa ] in - map ~kind:"DenominationKey" Fun.id + map ~kind:"DenomGroup" Fun.id |> case_mem "cipher" Jsont.string ~enc:Fun.id ~enc_case cases |> finish end