From ade0a8391fb61f3877ae0b6b5b875dc4481674b8 Mon Sep 17 00:00:00 2001 From: interp Date: Mon, 17 Feb 2003 09:08:27 +0000 Subject: [PATCH] + remove standard options from file handlers + remove superfluous comment --- scheme/httpd/surflets/start-surflet-server | 15 +++------------ 1 file changed, 3 insertions(+), 12 deletions(-) diff --git a/scheme/httpd/surflets/start-surflet-server b/scheme/httpd/surflets/start-surflet-server index 3e625bf..fc30d44 100755 --- a/scheme/httpd/surflets/start-surflet-server +++ b/scheme/httpd/surflets/start-surflet-server @@ -185,20 +185,13 @@ exec scsh -lm $sunet/packages.scm -lm $ssax/lib/packages.scm -lm $sunet/httpd/su with-resolve-ips? #f with-request-handler (alist-path-dispatcher - (list (cons "h" (home-dir-handler "public_html" - (make-file-directory-options))) + (list (cons "h" (home-dir-handler "public_html")) ; (cons "seval" seval-handler) ; (cons "man" (rman-handler #f "man?%s(%s)" ; "Generated by rman-gateway")) ; (cons "info" (info-handler #f #f #f ; "Generated by info-gateway")) ; (cons "cgi-bin" (cgi-handler cgi-bin-dir)) - ;; Browsers cannot handle .SCM files: Opera shows - ;; it as HTML, Netscape asks for a program to - ;; view it. ROOTED-FILE-OR-DIRECTORY-HANDLER - ;; should serve .SCM files as text/plain (I did - ;; not want to write a handler just for this file - ;; type.) (cons "source" (rooted-file-or-directory-handler surflet-dir (with-file-name->content-type @@ -207,11 +200,9 @@ exec scsh -lm $sunet/packages.scm -lm $ssax/lib/packages.scm -lm $sunet/httpd/su ".scm") "text/plain")) (make-file-directory-options)))) - (cons "img" (rooted-file-handler images-dir - (make-file-directory-options))) + (cons "img" (rooted-file-handler images-dir)) (cons "surflet" (surflet-handler surflet-dir))) - (rooted-file-or-directory-handler htdocs-dir - (make-file-directory-options))))) + (rooted-file-or-directory-handler htdocs-dir)))) ) )) ;; EOF