diff options
-rw-r--r-- | portal/test/js/websockets_hello.ml | 8 |
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 |