diff options
Diffstat (limited to '')
| -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 a20c298..86b2fd8 100644 --- a/test/unit/kernel/Session.ml +++ b/test/unit/kernel/Session.ml @@ -33,7 +33,7 @@ module Make (S : Abstract.Storage.STORAGE) (C : Helpers.Storage.CONFIGURATOR) = let* _ = update root ("branch" @/ this) "master" (Some branch) (Some branch') in let unchanged = finds root library in let* tip' = address branch' in - let* interface = Protocols.Session.require session in + let* interface = Protocols.Handle.require Protocols.Session.from session in Protocols.Session.pin interface {Protocols.Session.branch= "master"; snapshot= tip'}; let after = finds root library in let followed = Protocols.Session.state interface in |