From a4193a49a661b2fd056202eec3232b75a6457d65 Mon Sep 17 00:00:00 2001 From: Jay McCarthy Date: Tue, 29 May 2007 17:47:58 +0000 Subject: [PATCH] union to or/c svn: r6380 --- collects/web-server/prototype-web-server/private/session.ss | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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))