summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorThomas Hintz <t@thintz.com>2014-10-05 12:18:26 -0700
committerThomas Hintz <t@thintz.com>2014-10-05 12:18:26 -0700
commitc7c8de32f9363e652755fc5c59d8f0297e933456 (patch)
treec59df874dbdb957ec64660e7682d597853ce0b26
parentb592bd1073b2639bb7c979f1b17ab3b4bb41cca8 (diff)
downloadwebsockets-c7c8de32f9363e652755fc5c59d8f0297e933456.tar.gz
Update connection timeout close-reason to use name instead of number.
-rw-r--r--websockets.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/websockets.scm b/websockets.scm
index 4a78cb0..1e545e9 100644
--- a/websockets.scm
+++ b/websockets.scm
@@ -623,7 +623,7 @@ static const uint8_t utf8d[] = {
(begin (thread-signal! (websocket-user-thread ws)
(make-websocket-exception
(make-property-condition 'connection-timeout)))
- (close-websocket ws close-reason: 1001))))))))
+ (close-websocket ws close-reason: 'going-away))))))))
(when (> (ping-interval) 0)
(thread-start! ping-thread))