aboutsummaryrefslogtreecommitdiffstats
path: root/test/Helpers.ml
diff options
context:
space:
mode:
Diffstat (limited to '')
-rw-r--r--test/Helpers.ml12
1 files changed, 6 insertions, 6 deletions
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