From f56ef6b544a9913d7b78715acf27a254cb7279f0 Mon Sep 17 00:00:00 2001 From: swrup Date: Fri, 27 Feb 2026 00:33:29 +0100 Subject: [PATCH] rm deprecated --- src/api.ml | 14 +++++--------- src/http_info.ml | 2 -- 2 files changed, 5 insertions(+), 11 deletions(-) diff --git a/src/api.ml b/src/api.ml index b2e3506b..63bbba72 100644 --- a/src/api.ml +++ b/src/api.ml @@ -1265,7 +1265,6 @@ module ExchangeKeysResponse = struct accounts: ExchangeWireAccount.t list; wire_fees: AggregateTransferFee.t list Stdlib.Map.Make(Stdlib.String).t; wads: ExchangePartnerListEntry.t list; - rewards_allowed: bool; kyc_enabled: bool; disable_direct_deposit: bool; master_public_key: EddsaPublicKey.t; @@ -1291,11 +1290,11 @@ module ExchangeKeysResponse = struct let jsont = let make version base_url currency shopping_url open_banking_gateway bank_compliance_language currency_specification tiny_amount stefan_abs - stefan_log stefan_lin asset_type accounts wire_fees wads rewards_allowed - kyc_enabled disable_direct_deposit master_public_key - reserve_closing_delay wallet_balance_limit_without_kyc hard_limits - zero_limits denominations exchange_sig exchange_pub recoup global_fees - list_issue_date auditors signkeys extensions extensions_sig = + stefan_log stefan_lin asset_type accounts wire_fees wads kyc_enabled + disable_direct_deposit master_public_key reserve_closing_delay + wallet_balance_limit_without_kyc hard_limits zero_limits denominations + exchange_sig exchange_pub recoup global_fees list_issue_date auditors + signkeys extensions extensions_sig = { version; base_url; @@ -1312,7 +1311,6 @@ module ExchangeKeysResponse = struct accounts; wire_fees; wads; - rewards_allowed; kyc_enabled; disable_direct_deposit; master_public_key; @@ -1348,7 +1346,6 @@ module ExchangeKeysResponse = struct let accounts v = v.accounts in let wire_fees v = v.wire_fees in let wads v = v.wads in - let rewards_allowed v = v.rewards_allowed in let kyc_enabled v = v.kyc_enabled in let disable_direct_deposit v = v.disable_direct_deposit in let master_public_key v = v.master_public_key in @@ -1388,7 +1385,6 @@ module ExchangeKeysResponse = struct (Jsont.Object.as_string_map (Jsont.list AggregateTransferFee.jsont)) ~enc:wire_fees |> mem "wads" (Jsont.list ExchangePartnerListEntry.jsont) ~enc:wads - |> mem "rewards_allowed" Jsont.bool ~enc:rewards_allowed |> mem "kyc_enabled" Jsont.bool ~enc:kyc_enabled |> mem "disable_direct_deposit" Jsont.bool ~enc:disable_direct_deposit |> mem "master_public_key" EddsaPublicKey.jsont ~enc:master_public_key diff --git a/src/http_info.ml b/src/http_info.ml index a8793388..68dd0519 100644 --- a/src/http_info.ml +++ b/src/http_info.ml @@ -44,7 +44,6 @@ let mk_keys ~db_conn (module Keys : Keys.S) ~last_issue_date = String_map.singleton wire_method wire_fees in let wads = [] in - let rewards_allowed = false in let kyc_enabled = false in let disable_direct_deposit = false in let master_public_key = Config.master_public_key in @@ -138,7 +137,6 @@ let mk_keys ~db_conn (module Keys : Keys.S) ~last_issue_date = accounts; wire_fees; wads; - rewards_allowed; kyc_enabled; disable_direct_deposit; master_public_key;