Creating servlet-api directory for documentation purposes

svn: r6405

collects/web-server/dispatchers/dispatch-passwords.ss

@@ -5,7 +5,7 @@
            "../private/util.ss"
            "../private/configuration.ss"
            "../request-structs.ss"
-           "../private/basic-auth.ss"
+           "../servlet/basic-auth.ss"
            "../private/connection-manager.ss"
            "../private/response.ss")  
   (provide/contract

collects/web-server/private/parse-table.ss

@@ -2,7 +2,7 @@
   (require (lib "list.ss")
            (lib "contract.ss"))
   (require "configuration-table-structs.ss"
-           "bindings.ss")
+           "../servlet/bindings.ss")
   
   (define (get-binding key bindings default)
     (first (get-binding* key bindings (list default))))

collects/web-server/prototype-web-server/lang-api/web-extras.ss

@@ -1,7 +1,7 @@
 (module web-extras mzscheme
   (require (lib "url.ss" "net")
            "../private/web.ss"
-           (only "../../private/servlet-helpers.ss"
+           (only "../../servlet/helpers.ss"
                  extract-user-pass
                  redirect-to
                  permanently

collects/web-server/servlet/helpers.ss

@@ -1,9 +1,9 @@
-(module servlet-helpers mzscheme
+(module helpers mzscheme
   (require (lib "contract.ss")
            (lib "kw.ss")
            (lib "plt-match.ss")
            (lib "uri-codec.ss" "net"))
-  (require "util.ss"
+  (require "../private/util.ss"
            "bindings.ss"
            "basic-auth.ss"
            "../request-structs.ss"

collects/web-server/servlet/servlet-url.ss

@@ -4,7 +4,7 @@
            (lib "contract.ss")
            (lib "url.ss" "net")
            (lib "struct.ss"))
-  (require "url.ss"
+  (require "../private/url.ss"
            "../request-structs.ss")
   
   (define-struct servlet-url (protocol host port