X-Git-Url: https://code.delx.au/gnu-emacs-elpa/blobdiff_plain/6817d912be60c8d261856ee7c0ce959561e17f32..b6a1a9ee39968bff15edea88ec97da22d46f2c29:/packages/websocket/websocket-functional-test.el

diff --git a/packages/websocket/websocket-functional-test.el b/packages/websocket/websocket-functional-test.el
index af1a4ee89..6a9481fc2 100644
--- a/packages/websocket/websocket-functional-test.el
+++ b/packages/websocket/websocket-functional-test.el
@@ -107,9 +107,10 @@
         wstest-msgs nil)
   (sleep-for 0.3)
   (assert (websocket-openp wstest-ws))
+  (assert (eq 'open (websocket-ready-state wstest-ws)))
   (assert (null wstest-msgs))
   (websocket-send-text wstest-ws "Hi!")
-  (sleep-for 0.3)
+  (sleep-for 1)
   (assert (equal (car wstest-msgs) "Hi!"))
   (websocket-close wstest-ws))