This commit is contained in:
parent
05cfa7a5b1
commit
122d91b79d
8 changed files with 89 additions and 73 deletions
|
|
@ -199,35 +199,26 @@ let enable_auditor_cmd =
|
|||
let auditor_pub =
|
||||
Arg.(required & opt (some eddsa_pub) None & info [ "auditor_pub" ])
|
||||
in
|
||||
let validity_start =
|
||||
Arg.(required & opt (some timestamp) None & info [ "validity_start" ])
|
||||
in
|
||||
Cmd.make (Cmd.info "enable-auditor" ~doc)
|
||||
@@
|
||||
let+ output = output
|
||||
and+ master_key = master_key
|
||||
and+ auditor_url = auditor_url
|
||||
and+ auditor_name = auditor_name
|
||||
and+ auditor_pub = auditor_pub
|
||||
and+ validity_start = validity_start in
|
||||
and+ auditor_pub = auditor_pub in
|
||||
enable_auditor ~output ~master_key ~auditor_url ~auditor_name ~auditor_pub
|
||||
~validity_start
|
||||
|
||||
let disable_auditor_cmd =
|
||||
let doc = "Disable auditor." in
|
||||
let auditor_pub =
|
||||
Arg.(required & opt (some eddsa_pub) None & info [ "auditor_pub" ])
|
||||
in
|
||||
let validity_end =
|
||||
Arg.(required & opt (some timestamp) None & info [ "validity_end" ])
|
||||
in
|
||||
Cmd.make (Cmd.info "disable-auditor" ~doc)
|
||||
@@
|
||||
let+ output = output
|
||||
and+ master_key = master_key
|
||||
and+ auditor_pub = auditor_pub
|
||||
and+ validity_end = validity_end in
|
||||
disable_auditor ~output ~master_key ~auditor_pub ~validity_end
|
||||
and+ auditor_pub = auditor_pub in
|
||||
disable_auditor ~output ~master_key ~auditor_pub
|
||||
|
||||
let wire_fee_cmd =
|
||||
let doc = "Provides wire fee configuration." in
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue