switch from scheme to scheme/base

svn: r17472

collects/handin-server/main.ss

@@ -1,4 +1,5 @@
 #lang scheme/base
+
 (require mzlib/thread
          scheme/port
          openssl

collects/handin-server/run-servlet.ss

@@ -1,4 +1,4 @@
-#lang scheme
+#lang scheme/base
 
 (define default-context-length (error-print-context-length))
 
@@ -6,14 +6,14 @@
 ;; "web-server/servlet-env.ss", and parts from `serve/launch/wait' in
 ;; "web-server/servlet-dispatch.ss"
 
-(require web-server/web-server
+(require scheme/unit
+         scheme/async-channel
+         web-server/web-server
          web-server/servlet-dispatch
          web-server/managers/lru
          (prefix-in sequencer: web-server/dispatchers/dispatch-sequencer)
          (prefix-in log: web-server/dispatchers/dispatch-log)
-         web-server/private/connection-manager
          web-server/http/request-structs
-         scheme/async-channel
          net/url
          openssl
          net/tcp-sig)

collects/handin-server/web-status-server.ss

@@ -1,5 +1,7 @@
-#lang scheme
+#lang scheme/base
+
 (require scheme/list
+         scheme/path
          scheme/file
          scheme/date
          net/uri-codec