diff options
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/session.ml | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/lib/session.ml b/lib/session.ml index 7a69d37..cb44653 100644 --- a/lib/session.ml +++ b/lib/session.ml @@ -61,3 +61,6 @@ let create (config : config) : t Lwt.t = | _ -> Lwt.return_unit) state >|= S.keep; in { state; update } + +let connect (session : t) (domain : Portal.domain) : unit = + session.update (Connecting domain) |