diff --git a/racket/syndicate/drivers/web.rkt b/racket/syndicate/drivers/web.rkt index b006100..dccccaa 100644 --- a/racket/syndicate/drivers/web.rkt +++ b/racket/syndicate/drivers/web.rkt @@ -95,7 +95,7 @@ (dict-ref (web-request-header-headers req) 'content-type #f)) (define (web-request-header-websocket-upgrade? req) - (equal? (string-downcase (dict-ref (web-request-header-headers req) 'upgrade #f)) "websocket")) + (equal? (string-downcase (dict-ref (web-request-header-headers req) 'upgrade "")) "websocket")) (begin-for-declarations (define-struct-defaults make-web-response-header web-response-header