From 8d59f43f445164e8cc8bd3fe1a23bd04e807a6b3 Mon Sep 17 00:00:00 2001 From: Marcos Magueta Date: Sun, 2 Aug 2026 23:37:51 -0300 Subject: format --- test/Helpers.ml | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-) (limited to 'test/Helpers.ml') diff --git a/test/Helpers.ml b/test/Helpers.ml index 784170c..aa24160 100644 --- a/test/Helpers.ml +++ b/test/Helpers.ml @@ -33,12 +33,12 @@ module Storage = struct module Make (S : Abstract.Storage.STORAGE) (C : CONFIGURATOR) = struct let with_connection f dir () = with_temporary_directory dir begin fun dir -> - begin - let open Utilities.Result in - let* conn = S.connect (C.configure dir) in - Ok (f conn) - end - |> condition_as_failure + begin + let open Utilities.Result in + let* conn = S.connect (C.configure dir) in + Ok (f conn) + end + |> condition_as_failure end end end -- cgit v1.2.3