Skip to content
Browse files

Fix issue with inflight-input not being cleared out.

  • Loading branch information...
1 parent 4878bd1 commit a7239526f15989df87dd3a1b86ace42c36254e18 @ahyatt committed
Showing with 3 additions and 1 deletion.
  1. +2 −1 websocket-test.el
  2. +1 −0 websocket.el
View
3 websocket-test.el
@@ -374,7 +374,8 @@
(substring websocket-frames 0 2)))
(should open-callback-called)
(websocket-outer-filter fake-ws (substring websocket-frames 2))
- (should (equal (list frame2 frame1) processed-frames)))
+ (should (equal (list frame2 frame1) processed-frames))
+ (should-not (websocket-inflight-input fake-ws)))
(flet ((websocket-ready-state (websocket) 'connecting)
(websocket-close (websocket)))
(should (eq 500 (cdr (should-error
View
1 websocket.el
@@ -689,6 +689,7 @@ connection is invalid, the connection will be closed."
(end-point 0)
(text (concat (websocket-inflight-input websocket) output))
(header-end-pos))
+ (setf (websocket-inflight-input websocket) nil)
;; If we've received the complete header, check to see if we've
;; received the desired handshake.
(when (and (eq 'connecting (websocket-ready-state websocket))

0 comments on commit a723952

Please sign in to comment.
Something went wrong with that request. Please try again.