This commit is contained in:
swrup 2026-02-03 20:07:10 +01:00
parent 1af3718b1e
commit f1840ad9ac
2 changed files with 27 additions and 4 deletions

View file

@ -9,9 +9,6 @@ let read_master_key_file filename =
let* master_key = read_file filename in
Crypto.EddsaPrivateKey.of_octets master_key
let base_url = Uri.of_string "http://localhost:3434/"
let full_url path = Uri.with_path base_url path |> Uri.to_string
let download ~output =
let open Bos in
let uri = full_url "/management/keys/" in
@ -135,3 +132,7 @@ let global_fees ~output ~master_key ~start_date ~end_date ~history_fee
let* s = Api.encode Api.GlobalFees.jsont global_fees in
let* () = write_file output s in
Ok ()
[@@@ocaml.warning "-27"]
let enable_auditor ~output ~master_key ~auditor_url = assert false