Patch for cvs sunet server.scm

[Humberto Ortiz-Zuazaga <humberto@hpcf.upr.edu>]

I had to make some changes to server.scm in the CVS sunet I downloaded
to work with scsh-0.6.1. The way options are specified to the httpd
function has changed:

--- sunet/server.scm    Mon Oct  8 13:37:30 2001
+++ sunet-hoz/server.scm        Tue Mar 26 23:08:14 2002
@@ -12,6 +12,7 @@
 
 (define-structure http-top (export top)
   (open httpd-core
+       httpd-make-options
        cgi-server
        httpd-basic-handlers
        seval-handler
@@ -41,4 +42,12 @@
             (set-gid -2)  ; Should be (set-uid (->uid "nobody")) 
             (set-uid -2)))     ; but NeXTSTEP loses. 
       (initialise-request-invariant-cgi-env)
-      (httpd ph 8001 "/zu/shivers"))))
+      (httpd (with-path-handler
+             ph
+             (with-port
+              8001
+              (with-root-directory 
+               "/usr/local/etc/httpd/htdocs"
+               (with-syslog? #t))))))))
+
+


-- 
Humberto Ortiz Zuazaga
Programmer-Archaeologist
High Performance Computing facility
University of Puerto Rico
http://www.hpcf.upr.edu/~humberto/