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

Correct leftover from the fork-based implementation: adjust port-buffering of socket's input port.

This commit is contained in:
mainzelm 2002-12-29 17:49:06 +00:00
parent bfab4cc710
commit e3ef1280c4
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
scheme/httpd/core.scm
View File

@ -70,7 +70,7 @@
(set-port-buffering (socket:outport sock) bufpol/none) ; No buffering (set-port-buffering (socket:outport sock) bufpol/none) ; No buffering
(fork-thread (fork-thread
(lambda () (lambda ()
(set-port-buffering (current-input-port) bufpol/none) (set-port-buffering (socket:inport sock) bufpol/none)
(process-toplevel-request sock host-address options) (process-toplevel-request sock host-address options)
(if (http-syslog?) (if (http-syslog?)
(http-syslog (syslog-level debug) "<~a>~a [closing]~%" (http-syslog (syslog-level debug) "<~a>~a [closing]~%"