diff --git a/collects/web-server/prototype-web-server/private/session.ss b/collects/web-server/prototype-web-server/private/session.ss index 5c5c88366f..01aac5c6f0 100644 --- a/collects/web-server/prototype-web-server/private/session.ss +++ b/collects/web-server/prototype-web-server/private/session.ss @@ -13,7 +13,7 @@ [namespace namespace?] [servlet (request? . -> . response?)] [url url?])] - [lookup-session (number? . -> . (union session? boolean?))] + [lookup-session (number? . -> . (or/c session? boolean?))] [new-session (custodian? namespace? url? . -> . session?)]) (define current-session (make-parameter #f))