aboutsummaryrefslogtreecommitdiff
path: root/portal/test
diff options
context:
space:
mode:
Diffstat (limited to 'portal/test')
-rw-r--r--portal/test/js/websockets_hello.ml8
1 files changed, 4 insertions, 4 deletions
diff --git a/portal/test/js/websockets_hello.ml b/portal/test/js/websockets_hello.ml
index 73024e5..795135e 100644
--- a/portal/test/js/websockets_hello.ml
+++ b/portal/test/js/websockets_hello.ml
@@ -21,8 +21,8 @@ let () =
let* stream, push =
Portal_ws.connect domain in
push (Some (Portal_ws.stanza_open domain));
- push (Some "<iq>malformed");
- push (Some "</iq>");
push (Some Portal_ws.stanza_close);
- let+ _ = Lwt_stream.iter (fun f -> print_endline f) stream
- in push None
+ Lwt_stream.iter
+ (fun stanza ->
+ print_endline (">>> " ^ stanza))
+ stream