From 26c00bcb39d761952b2d1a9a6fa60416f4e6ea8d Mon Sep 17 00:00:00 2001 From: Jay McCarthy Date: Fri, 25 May 2007 23:26:46 +0000 Subject: [PATCH] Moving xexpr-extras svn: r6326 --- .../web-server/prototype-web-server/dispatch-servlets2.ss | 4 +--- .../prototype-web-server/{ => private}/xexpr-extras.ss | 0 2 files changed, 1 insertion(+), 3 deletions(-) rename collects/web-server/prototype-web-server/{ => private}/xexpr-extras.ss (100%) diff --git a/collects/web-server/prototype-web-server/dispatch-servlets2.ss b/collects/web-server/prototype-web-server/dispatch-servlets2.ss index ad707b3f09..8aa65a64d6 100644 --- a/collects/web-server/prototype-web-server/dispatch-servlets2.ss +++ b/collects/web-server/prototype-web-server/dispatch-servlets2.ss @@ -16,7 +16,6 @@ (only "private/web.ss" start-servlet) (lib "web-cells.ss" "web-server" "prototype-web-server" "lang-api") - "xexpr-extras.ss" "private/utils.ss") (provide make) @@ -155,8 +154,7 @@ (request-method req)))]) (printf "session-handler ~S~n" (session-handler ses)) (output-response conn - (xexpr+extras->xexpr - ((session-handler ses) req))))))] + ((session-handler ses) req)))))] [else (myprint "resume-session: Unknown ses~n") ;; TODO: should just start a new session here. diff --git a/collects/web-server/prototype-web-server/xexpr-extras.ss b/collects/web-server/prototype-web-server/private/xexpr-extras.ss similarity index 100% rename from collects/web-server/prototype-web-server/xexpr-extras.ss rename to collects/web-server/prototype-web-server/private/xexpr-extras.ss