From 6687016c7e95f9a9788eb1ec49eab9decf855a78 Mon Sep 17 00:00:00 2001 From: Clombrong Date: Sat, 28 Jun 2025 09:28:03 +0200 Subject: feat(portal_ws): implement starttls function --- portal/ws/portal.ml | 2 ++ 1 file changed, 2 insertions(+) (limited to 'portal') diff --git a/portal/ws/portal.ml b/portal/ws/portal.ml index 496806d..ad1eb86 100644 --- a/portal/ws/portal.ml +++ b/portal/ws/portal.ml @@ -153,3 +153,5 @@ let connect domain = |> to_lwt_stream |> Lwt_stream.iter (fun s -> ws_push (Some s))); {stream; push; _socket=ws} + +let starttls _ = Lwt.fail_with "STARTTLS is unimplemented in WebSockets." -- cgit v1.2.3