fix(websockets_hello): stop picking up authenticate's features stream

1 files changed, 6 insertions, 7 deletions

diff --git a/test/js/websockets_hello.ml b/test/js/websockets_hello.ml
index 91c2b70..952be45 100644
--- a/test/js/websockets_hello.ml
+++ b/test/js/websockets_hello.ml
@@ -18,13 +18,12 @@ let rec run t =
         else ()
 
 let main (stream, push) config =
-  let* _stream = Stream.get stream
-  in let+ _auth = Sasl.authenticate (stream, push) config
-     in match _auth with
-        | Error (NotAuthorized, Some (_, text)) -> print_endline ("Not authorized: " ^ text)
-        | Error (MalformedRequest, Some (_, text)) -> print_endline ("Malformed request: " ^ text)
-        | Error _ -> print_endline "Error!"
-        | Ok _ -> print_endline "Success!"
+  let+ _auth = Sasl.authenticate (stream, push) config
+  in match _auth with
+     | Error (NotAuthorized, Some (_, text)) -> print_endline ("Not authorized: " ^ text)
+     | Error (MalformedRequest, Some (_, text)) -> print_endline ("Malformed request: " ^ text)
+     | Error _ -> print_endline "Error!"
+     | Ok _ -> print_endline "Success!"
 
 let () =
   run @@