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.