From 2b6ba365bd31fa31e9cff938857e789c7941eae7 Mon Sep 17 00:00:00 2001
From: Jay McCarthy <jay@racket-lang.org>
Date: Wed, 30 May 2007 15:41:06 +0000
Subject: [PATCH] setup-plt needs a make clean before building

svn: r6406
---
 collects/web-server/dispatchers/dispatch-servlets.ss |  2 +-
 collects/web-server/servlet.ss                       | 12 ++++++------
 2 files changed, 7 insertions(+), 7 deletions(-)

diff --git a/collects/web-server/dispatchers/dispatch-servlets.ss b/collects/web-server/dispatchers/dispatch-servlets.ss
index 5fe8abcb2f..85445ca33c 100644
--- a/collects/web-server/dispatchers/dispatch-servlets.ss
+++ b/collects/web-server/dispatchers/dispatch-servlets.ss
@@ -393,4 +393,4 @@
              ;; more here - make timeouts proportional to size of bindings
              (servlet-content-producer conn req)]
             [else
-             (next-dispatcher)]))))
+             (next-dispatcher)]))))
\ No newline at end of file
diff --git a/collects/web-server/servlet.ss b/collects/web-server/servlet.ss
index 5ea6750fc7..9f1b062514 100644
--- a/collects/web-server/servlet.ss
+++ b/collects/web-server/servlet.ss
@@ -5,13 +5,13 @@
   (require "managers/manager.ss"
            "private/servlet.ss"
            "private/url.ss"
-           "private/servlet-helpers.ss"
-           "private/web-cells.ss"
+           "servlet/helpers.ss"
+           "servlet/web-cells.ss"
            "servlet-structs.ss")  
-  (require "private/servlet-url.ss")
-  (provide (all-from "private/web-cells.ss")
-           (all-from "private/servlet-helpers.ss")
-           (all-from "private/servlet-url.ss")
+  (require "servlet/servlet-url.ss")
+  (provide (all-from "servlet/web-cells.ss")
+           (all-from "servlet/helpers.ss")
+           (all-from "servlet/servlet-url.ss")
            (all-from "servlet-structs.ss"))
   
   ;; ************************************************************