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 edb22c4..0665985 100644 --- a/test/unit/kernel/Session.ml +++ b/test/unit/kernel/Session.ml @@ -39,7 +39,7 @@ module Make (S : Abstract.Storage.STORAGE) (C : Helpers.Storage.CONFIGURATOR) = Protocols.Session.pin interface {Protocols.Session.snapshot= tip'}; let after = finds root library in let* pinned = - lookup root ("system" @/ "session" @/ "client" @/ "branch" @/ this) |> fmap address + lookup root ("system" @/ "session" @/ "client" @/ "branch" @/ this) |>> address in let refused = assoc session ("branch" @/ "multigroup" @/ this) "other" (Some multigroup) |