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

Remove stray DECLINE which would shut down the server in the face of 

internal server errors.
This commit is contained in:
sperber 2003-01-07 13:40:34 +00:00
parent db72d0f439
commit 7f5219220b
1 changed files with 1 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
scheme/httpd/core.scm
View File

@ -128,8 +128,7 @@
(shutdown-socket sock shutdown/sends+receives) (shutdown-socket sock shutdown/sends+receives)
(http-syslog (syslog-level info) "<~a>~a [shut down]~%" (http-syslog (syslog-level info) "<~a>~a [shut down]~%"
(pid) (pid)
(format-internet-host-address host-address)) (format-internet-host-address host-address)))))
(decline))))
(lambda () (lambda ()
(call-with-values (call-with-values
(lambda () (lambda ()