From 75a0aef0a645d73ca03a0bebb1dbc2180d4b9b1c Mon Sep 17 00:00:00 2001 From: swrup Date: Thu, 5 Feb 2026 18:08:11 +0100 Subject: [PATCH] --- src/hash.ml | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/hash.ml b/src/hash.ml index 317ae2b1..4b1abce6 100644 --- a/src/hash.ml +++ b/src/hash.ml @@ -38,7 +38,7 @@ module H32 = struct map (bytes 32) of_octets to_octets (* hashes are not b32 encoded in the database *) - let caqti : t Caqti_type.t = + let caqti = let open Caqti_type in custom ~encode:(fun v -> Ok (to_octets v)) @@ -73,7 +73,7 @@ module H64 = struct map (bytes 64) of_octets to_octets (* hashes are not b32 encoded in the database *) - let caqti : t Caqti_type.t = + let caqti = let open Caqti_type in custom ~encode:(fun v -> Ok (to_octets v))