~
This commit is contained in:
parent
67bd144bb0
commit
28872cb239
3 changed files with 17 additions and 21 deletions
|
|
@ -303,7 +303,7 @@ module Auditors = struct
|
|||
let auditor_pub = v.AuditorSetupMessage.auditor_pub in
|
||||
let validity_start = v.AuditorSetupMessage.validity_start in
|
||||
let* last_date_opt =
|
||||
Pg.lookup_auditor_timestamp db_conn auditor_pub |> unwrap_err_caqti
|
||||
Pg.get_auditor_timestamp db_conn auditor_pub |> unwrap_err_caqti
|
||||
in
|
||||
match last_date_opt with
|
||||
| None ->
|
||||
|
|
@ -341,7 +341,7 @@ module Auditors_disable = struct
|
|||
let do_ ~db_conn auditor_pub
|
||||
AuditorTeardownMessage.{ master_sig= _; validity_end } =
|
||||
let* last_date_opt =
|
||||
Pg.lookup_auditor_timestamp db_conn auditor_pub |> unwrap_err_caqti
|
||||
Pg.get_auditor_timestamp db_conn auditor_pub |> unwrap_err_caqti
|
||||
in
|
||||
match last_date_opt with
|
||||
| None -> Error "auditor not found"
|
||||
|
|
@ -460,7 +460,7 @@ module Global_fees = struct
|
|||
let* global_fees =
|
||||
let start_date = v.GlobalFees.start_date in
|
||||
let end_date = v.GlobalFees.end_date in
|
||||
Pg.lookup_global_fees_by_time db_conn ~start_date ~end_date
|
||||
Pg.get_global_fees_by_time db_conn ~start_date ~end_date
|
||||
|> unwrap_err_caqti
|
||||
in
|
||||
match global_fees with
|
||||
|
|
@ -526,7 +526,7 @@ module Wire = struct
|
|||
let do_ ~db_conn v =
|
||||
let* last_change_opt =
|
||||
let payto_uri = v.WireSetupMessage.payto_uri in
|
||||
Pg.lookup_wire_timestamp db_conn ~payto_uri |> unwrap_err_caqti
|
||||
Pg.get_wire_timestamp db_conn ~payto_uri |> unwrap_err_caqti
|
||||
in
|
||||
match last_change_opt with
|
||||
| Some _ -> Error "wire already setup"
|
||||
|
|
@ -573,7 +573,7 @@ module Wire_disable = struct
|
|||
let do_ ~db_conn
|
||||
WireTeardownMessage.{ payto_uri; master_sig_del= _; validity_end } =
|
||||
let* last_change_opt =
|
||||
Pg.lookup_wire_timestamp db_conn ~payto_uri |> unwrap_err_caqti
|
||||
Pg.get_wire_timestamp db_conn ~payto_uri |> unwrap_err_caqti
|
||||
in
|
||||
match last_change_opt with
|
||||
| None -> Error "wire not found"
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue