From cec8ba878de155d65d3fc0b94e2f239666fd84d3 Mon Sep 17 00:00:00 2001
From: swrup <swrup@protonmail.com>
Date: Sat, 18 Oct 2025 00:50:31 +0200
Subject: [PATCH]

---
 src/binary_formats.ml | 2 +-
 src/management.ml     | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/binary_formats.ml b/src/binary_formats.ml
index 60eb5535..cc61cb34 100644
--- a/src/binary_formats.ml
+++ b/src/binary_formats.ml
@@ -235,7 +235,7 @@ end
 module DenominationHash = struct
   include HASH_64
 
-  let mk (pub : Mirage_crypto_pk.Rsa.pub) =
+  let hash (pub : Mirage_crypto_pk.Rsa.pub) =
     pub
     |> GNUNET_RsaPublicKey.of_pub
     |> Bin.to_string GNUNET_RsaPublicKey.bin
diff --git a/src/management.ml b/src/management.ml
index 7a43c5b6..00d548a0 100644
--- a/src/management.ml
+++ b/src/management.ml
@@ -28,7 +28,7 @@ let mk_future_denom denom_secmod_sign_f
   in
   let denom_secmod_sig =
     let open Binary_formats in
-    let h_denom_pub = DenominationHash.mk pub in
+    let h_denom_pub = DenominationHash.hash pub in
     let h_section_name = HashCode.of_string section_name in
     let anchor_time =
       TimeAbsoluteNBO.{ v= Util.ptime_to_int64_us stamp_start }