diff --git a/src/http_keys.ml b/src/http_keys.ml index ee3179fe..c94d4ca9 100644 --- a/src/http_keys.ml +++ b/src/http_keys.ml @@ -95,7 +95,11 @@ let mk_keys ~db_conn (module Sm : Secmod.S) ~last_issue_date = let wallet_balance_limit_without_kyc = None in let hard_limits = [] in let zero_limits = [] in - let* denom_data_l = Pg.get_denominations db_conn |> unwrap_err_caqti in + let denom_data_l = + (* TODO sm-db *) + (*Pg.get_denominations db_conn |> unwrap_err_caqti *) + Sm.get_denoms_data () + in (* TODO check order!! *) let denom_data_l = List.sort @@ -118,7 +122,7 @@ let mk_keys ~db_conn (module Sm : Secmod.S) ~last_issue_date = in let signkeys = - (* TODO + (* TODO sm-db use database signkey data / verify secmod and database are in sync *) (*let+ signkey_data_l = Pg.get_active_signkeys db_conn |> unwrap_err_caqti in*) let signkey_data_l = Sm.get_signkeys_data () in