branch: externals/websocket
commit c4f17b1b70d7f22ea3f6467d1f00bae23d622f2e
Author: Yuya Minami <yuya...@me.com>
Commit: Yuya Minami <yuya...@me.com>
Add `'run` to handshake status
when `gnutls-available-p` returns nil, `process-status` returns `'run`
---
websocket.el | 6 +++---
1 file changed, 3 insertions(+), 3 deletions(-)
diff --git a/websocket.el b/websocket.el
index a6521ecae4..736a2647b0 100644
--- a/websocket.el
+++ b/websocket.el
@@ -741,9 +741,9 @@ to the websocket protocol.
(let ((url-struct (url-generic-parse-url url))
(websocket (process-get conn :websocket)))
(when(and (eq 'connecting (websocket-ready-state websocket))
- (eq (process-status conn)
- (or (and nowait 'connect)
- 'open)))
+ (memq (process-status conn)
+ (or (and nowait '(connect run))
+ '(open run))))
(process-send-string conn
(format "GET %s HTTP/1.1\r\n"
(let ((path (url-filename url-struct)))
