aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorClombrong <cromblong@egregore.fun>2025-06-26 21:38:08 +0200
committerClombrong <cromblong@egregore.fun>2025-06-27 08:56:42 +0200
commitebb05a49d55297a65b3c3ba9c3178d5be52d2f82 (patch)
treebd4ec951545627424a752e7d19dd8f25304490c4
parent96989d5ca5aa15035352dcd4e80fa944d9ebd708 (diff)
docs(portal_tcp): fix obsolete warning
-rw-r--r--portal/tcp/portal.ml4
1 files changed, 1 insertions, 3 deletions
diff --git a/portal/tcp/portal.ml b/portal/tcp/portal.ml
index bfb2cb7..3477429 100644
--- a/portal/tcp/portal.ml
+++ b/portal/tcp/portal.ml
@@ -80,9 +80,7 @@ let tcp_stream (domain : string) : (string Lwt_stream.t * file_descr) Lwt.t =
[domain] via plaintext TCP.
This function is a comparatively simple wrapper around the original TCP stream,
- simply converting to/from Markup.ml signals.
-
- TODO: right now it's possible to get parts of unfinished stanzas... *)
+ simply converting to/from Markup.ml signals. *)
let connect (domain : string) : t Lwt.t =
let+ tcp_stream, tcp_socket = tcp_stream domain in
let send msg =