summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorClombrong <cromblong@egregore.fun>2025-06-28 09:28:03 +0200
committerClombrong <cromblong@egregore.fun>2025-06-28 16:44:54 +0200
commit6687016c7e95f9a9788eb1ec49eab9decf855a78 (patch)
tree044180a73d9132afe5ff235b4e5c9cd9ac2cb181
parenta10af644088c7da9c6f6040f2628af02368c32d1 (diff)
feat(portal_ws): implement starttls function
-rw-r--r--portal/ws/portal.ml2
1 files changed, 2 insertions, 0 deletions
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."