From e9525dfe3c51974ef54d1a1e3ab59540204c41a4 Mon Sep 17 00:00:00 2001 From: ejMina226 <118474890+ejMina226@users.noreply.github.com> Date: Mon, 22 Jan 2024 18:41:59 +0000 Subject: [PATCH] Code review changes --- src/lib/mina_base/user_command.ml | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) diff --git a/src/lib/mina_base/user_command.ml b/src/lib/mina_base/user_command.ml index 21403ca9ccee..9ebcca9b553e 100644 --- a/src/lib/mina_base/user_command.ml +++ b/src/lib/mina_base/user_command.ml @@ -235,8 +235,7 @@ let minimum_fee = Currency.Fee.minimum_user_command_fee let has_insufficient_fee t = Currency.Fee.(fee t < minimum_fee) -let is_disabled t = - match t with +let is_disabled = function | Zkapp_command _ -> Mina_compile_config.zkapps_disabled | _ -> @@ -409,7 +408,7 @@ module Well_formedness_error = struct | Zkapp_too_big err -> sprintf "Zkapp too big (%s)" (Error.to_string_hum err) | Transaction_type_disabled -> - "Zkapps are disabled" + "Transaction type disabled" end let check_well_formedness ~genesis_constants t :