diff options
author | Clombrong <cromblong@egregore.fun> | 2025-06-28 10:24:02 +0200 |
---|---|---|
committer | Clombrong <cromblong@egregore.fun> | 2025-06-28 16:44:54 +0200 |
commit | 3c589a4f52c504d2eda8d91be6ec6dda10ad979b (patch) | |
tree | 24838a665bc7087177dd411d4824f957f69ea5cc /portal/tcp/portal.ml | |
parent | 30db9d40e1fd80b7eda0bd29e52b701c18d18322 (diff) |
style(tcp_portal): remove some explicit Markup_lwt
Diffstat (limited to 'portal/tcp/portal.ml')
-rw-r--r-- | portal/tcp/portal.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/portal/tcp/portal.ml b/portal/tcp/portal.ml index 9241312..b39c0c0 100644 --- a/portal/tcp/portal.ml +++ b/portal/tcp/portal.ml @@ -164,7 +164,7 @@ let socket_to_stream (sock : socket) = |> parse_xml ~report |> signals in Lwt.async (fun () -> - let* _ = lwt_stream outbound_stream |> Markup_lwt.write_xml |> iter chomp + let* _ = lwt_stream outbound_stream |> write_xml |> iter chomp in let* _ = flush_buffer () in close_sock ()); (stream, push) |