aboutsummaryrefslogtreecommitdiff
path: root/test/js/websockets_hello.ml
diff options
context:
space:
mode:
Diffstat (limited to 'test/js/websockets_hello.ml')
-rw-r--r--test/js/websockets_hello.ml5
1 files changed, 4 insertions, 1 deletions
diff --git a/test/js/websockets_hello.ml b/test/js/websockets_hello.ml
index 8af5a5e..9043501 100644
--- a/test/js/websockets_hello.ml
+++ b/test/js/websockets_hello.ml
@@ -21,7 +21,10 @@ let main (stream, push) =
in let+ _auth = Auth.send_auth_stanza (stream, push)
"test@example.com" "password"
Auth.PLAIN
- in push None
+ in push None;
+ match _auth with
+ | Error (NotAuthorized, Some ("en", text)) -> print_endline text
+ | _ -> ()
let () =
run @@