correct log output to logfile

This commit is contained in:
interp 2002-08-22 13:19:57 +00:00
parent 2b8822a72d
commit 092874805f
1 changed files with 3 additions and 1 deletions

View File

@ -118,7 +118,9 @@
(format #f "~A - - ~A ~S ~A ~A ~S ~S~%"
(or remote-ip "-")
(format-date "[~d/~b/~Y:~H:~M:~S +0000]" (date)) ; +0000 as we don't know
(string-join (list request-type "/" requested-file protocol))
(string-join (list request-type
(string-append "/" requested-file)
protocol))
; Unfortunately, we first split the request line into
; method/request-type etc. and put it together here.
; Files conform to CLF are expected to print the original line.