branch: externals/websocket commit 98ac61416729b208dc6a6c0c739f70718ac0f320 Author: vritser <vrit...@163.com> Commit: vritser <vrit...@163.com>
set ready-state to 'closed when websocket is closed abnormally --- websocket.el | 1 + 1 file changed, 1 insertion(+) diff --git a/websocket.el b/websocket.el index e5a63f237c..63668eb2e3 100644 --- a/websocket.el +++ b/websocket.el @@ -720,6 +720,7 @@ to the websocket protocol. (when (and (member status '(closed failed exit signal)) (not (eq 'closed (websocket-ready-state websocket)))) + (setf (websocket-ready-state websocket) 'closed) (websocket-try-callback 'websocket-on-close 'on-close websocket)))))) (defun websocket-ensure-handshake (url conn key protocols extensions custom-header-alist nowait)