This commit is contained in:
swrup 2026-02-28 01:27:25 +01:00
parent 867ef1f47b
commit f7cb91615d
3 changed files with 44 additions and 21 deletions

View file

@ -74,8 +74,13 @@ let keys content =
let denom_l = v.denominations |> Denomination.denoms_of_denomgroups in
let* () =
denom_l
|> list_iter
(Denomination.verify_denomination_key_validity ~key:v.master_public_key)
|> list_iter (fun dn ->
let* () =
Denomination.verify_denomination_key_validity ~key:v.master_public_key
dn
in
Fmt.pr "validated a denom@.";
Ok ())
in
let* () =
let last_issue_date =