aboutsummaryrefslogtreecommitdiff
path: root/portal/ws
diff options
context:
space:
mode:
Diffstat (limited to 'portal/ws')
-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."