suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Fixing signature

Browse Source 
svn: r736
This commit is contained in:
Jay McCarthy 2005-09-01 19:40:50 +00:00
parent d5ded0000d
commit a4ded2be5e
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
collects/web-server/web-server-unit.ss
View File

@ -157,7 +157,7 @@
(host-info->dispatcher host-info))))])
(lambda (conn req)
(let* ([host (get-host (request-uri req) (request-headers req))]
[host-info (config:virtual-hosts host)])
[host-info (config:virtual-hosts (symbol->string host))])
((host-log-message host-info) (request-host-ip req)
(request-client-ip req) (request-method req) (request-uri req) host)
((lookup-dispatcher host host-info)