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

added HTTP-SYSLOG call when a reply-code is not handled.

This commit is contained in:
interp 2002-04-14 16:58:49 +00:00
parent 15d1ab7b23
commit c83ffe0ad4
1 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
httpd-core.scm
View File

@ -263,7 +263,7 @@
(parse-http-request sock options))) ; (1) Parse request.
(handler
(httpd-options-path-handler options)))
(handler (cdr (http-url:path (request:url req))) req) ; (2) Deal with it. (skipped initial "/")
(handler (cdr (http-url:path (request:url req))) req) ; (2) Deal with it. (skip initial "/")
(http-log req http-reply/ok))))
@ -609,7 +609,9 @@ the requested method (~A).~%"
(request:method req))
(if message (format out "<P>~a~%" message)))))
(else (if html-ok? (generic-title))))
(else
(http-syslog (syslog-level info) "Skipping unhandled reply code ~A.~%" reply-code)
(if html-ok? (generic-title))))
(cond
(html-ok?