aboutsummaryrefslogtreecommitdiffstats
path: root/lib/kernel/Initialization.ml
diff options
context:
space:
mode:
Diffstat (limited to 'lib/kernel/Initialization.ml')
-rw-r--r--lib/kernel/Initialization.ml4
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/kernel/Initialization.ml b/lib/kernel/Initialization.ml
index ab91dbc..d213b66 100644
--- a/lib/kernel/Initialization.ml
+++ b/lib/kernel/Initialization.ml
@@ -6,7 +6,7 @@ module Make (S : Abstract.Storage.STORAGE) = struct
let open Protocols in
let root = Namespace.make () in
let registry = Registry.from root |> Option.get in
- let* branch = BM.make conn "rnt-head" in
- let* _ = Registry.update registry "branch" None (Some branch) in
+ let* branch_manager = BM.make conn "rnt-head" in
+ let* _ = Registry.update registry "branch" None (Some branch_manager) in
Ok root
end