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

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
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
scheme/httpd/logging.scm
View File

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