From 1767babf41d81cce5df7a4e221983cf99c850b44 Mon Sep 17 00:00:00 2001 From: Clombrong Date: Tue, 10 Jun 2025 02:01:11 +0200 Subject: test(auth): add send_auth_stanza to tests --- test/js/websockets_hello.ml | 10 +++++++--- 1 file changed, 7 insertions(+), 3 deletions(-) (limited to 'test/js') diff --git a/test/js/websockets_hello.ml b/test/js/websockets_hello.ml index f2f65b6..3b48e16 100644 --- a/test/js/websockets_hello.ml +++ b/test/js/websockets_hello.ml @@ -21,6 +21,10 @@ let () = let domain = "egregore.fun" in let* stream, push = Stream.start domain in let* _stream = Lwt_stream.get stream - in push (Some "wrong"); - let+ _recv = Lwt_stream.get stream in - push None + in let _auth = Auth.send_auth_stanza (stream, push) + "test@example.com" "password" + Auth.PLAIN + in print_endline _auth; + push (Some "wrong"); + let+ _recv = Lwt_stream.get stream in + push None -- cgit v1.2.3