branch: externals/websocket
commit 6369b4fc48f735722d3b12cde427890d379490fb
Author: dickmao <none>
Commit: dickmao <none>

    return value of websocket-mask needs to be unibyte
---
 websocket.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/websocket.el b/websocket.el
index 31af67a1ac..b10bfb9dcd 100644
--- a/websocket.el
+++ b/websocket.el
@@ -294,7 +294,7 @@ This is used to both mask and unmask data."
    with result = (make-string (length data) ?x)
    for i from 0 below (length data)
    do (setf (seq-elt result i) (logxor (aref key (mod i 4)) (seq-elt data i)))
-   finally return result))
+   finally return (string-as-unibyte result)))
 
 (defun websocket-ensure-length (s n)
   "Ensure the string S has at most N bytes.

Reply via email to