diff options
Diffstat (limited to 'test/unit/kernel/Session.ml')
| -rw-r--r-- | test/unit/kernel/Session.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/test/unit/kernel/Session.ml b/test/unit/kernel/Session.ml index 2548629..73e7c49 100644 --- a/test/unit/kernel/Session.ml +++ b/test/unit/kernel/Session.ml @@ -25,7 +25,7 @@ module Make (S : Abstract.Storage.STORAGE) (C : Helpers.Storage.CONFIGURATOR) = let* _ = update root ("branch" @/ this) "master" None (Some branch) in let* tip = address branch in let session = Session.make conn {Protocols.Session.snapshot= tip} in - let* _ = update root ("session" @/ this) "client" None (Some session) in + let* _ = update root ("session" @/ this) "client" None (Protocols.Handle.copy session) in let library = "session" @/ "client" @/ "branch" @/ "multigroup" @/ "library" @/ this in let before = finds root library in let* multigroup = M.make conn in |