use correct denomination hash
This commit is contained in:
parent
b1de214881
commit
b8574ca52d
14 changed files with 142 additions and 61 deletions
|
|
@ -58,7 +58,7 @@ module Denom_revoke = struct
|
|||
Logs.info (fun m -> m "POST /management/denominations/$H_DENOM_PUB/revoke/");
|
||||
let keys = Vif.Server.device Devices.keys server in
|
||||
let res =
|
||||
let* h_denom_pub = DenominationHash.of_b32 h_denom_pub in
|
||||
let* h_denom_pub = Crypto.DenominationHash.of_b32 h_denom_pub in
|
||||
let* v = Vif.Request.of_json req |> unwrap_err_msg in
|
||||
let* () = verify keys h_denom_pub v in
|
||||
let* () = do_ keys h_denom_pub v in
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue