scsh-conservatory
/
sunet
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Adjust use of TILDE-HOME-DIR-HANDLER.

This commit is contained in:
sperber 2002-08-27 09:45:05 +00:00
parent 3b6b813965
commit 013c7bd5b3
1 changed files with 2 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
scheme/httpd/server.scm
View File

@ -28,10 +28,8 @@ exec scsh -lm ../packages.scm -dm -o http-top -e top -s "$0" "$@"
`(("h" . ,(home-dir-handler "public_html")) `(("h" . ,(home-dir-handler "public_html"))
("seval" . ,seval-handler) ("seval" . ,seval-handler)
("cgi-bin" . ,(cgi-handler "/usr/local/etc/httpd/cgi-bin"))) ("cgi-bin" . ,(cgi-handler "/usr/local/etc/httpd/cgi-bin")))
(make-path-handler (tilde-home-dir-handler "public_html"
tilde-home-dir-handler-predicate (rooted-file-handler "/usr/local/etc/httpd/htdocs"))))
(tilde-home-dir-handler "public_html")
(rooted-file-handler "/usr/local/etc/httpd/htdocs"))))