Format

1 files changed, 4 insertions, 3 deletions

diff --git a/lib/management/merge.ml b/lib/management/merge.ml
index a8860fe..dff4808 100644
--- a/lib/management/merge.ml
+++ b/lib/management/merge.ml
@@ -11,6 +11,7 @@ type strategy = PreferLeft | PreferRight | RevertToAncestor
 type merge_result = Clean of Database.t | Failed of conflict list
 
 (* TODO: Remove this later. We already should have the interface on the manipulation *)
+
 (** Module type for the subset of Manipulation.Make we need. *)
 module type MANIPULATION = sig
   type storage
@@ -279,9 +280,9 @@ struct
                         all_conflicts
                     in
                     if unresolvable <> [] then Ok (Failed unresolvable)
-                    else begin
-                      match Manip.store_database storage merged_db with
+                    else
+                      begin match Manip.store_database storage merged_db with
                       | Error e -> Error e
                       | Ok () -> Ok (Clean merged_db)
-                    end)))
+                      end)))
 end