diff options
| author | Christopher Allan Webber <cwebber@dustycloud.org> | 2017-08-11 15:44:28 -0500 |
|---|---|---|
| committer | Christopher Allan Webber <cwebber@dustycloud.org> | 2017-08-11 15:44:28 -0500 |
| commit | 14a5e83316eb2b48eeda2282a21f7cde06937e84 (patch) | |
| tree | e82aaf7bae6f4fe5baf051394e8d703215984093 | |
| parent | 5b14912b0f727252f4701c3fe4cb742e4192457b (diff) | |
| download | 8sync-14a5e83316eb2b48eeda2282a21f7cde06937e84.tar.gz | |
Remove stray `pk' from web.scm.
* 8sync/systems/web.scm (web-server-socket-loop): Remove stray `pk'.
| -rw-r--r-- | 8sync/systems/web.scm | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/8sync/systems/web.scm b/8sync/systems/web.scm index 5d3ad3a..6b8d14f 100644 --- a/8sync/systems/web.scm +++ b/8sync/systems/web.scm @@ -126,7 +126,6 @@ as we're alive." (while #t (match (accept (.socket web-server)) ((client . sockaddr) - (pk 'a-client client sockaddr) ;; From "HOP, A Fast Server for the Diffuse Web", Serrano. (setsockopt client SOL_SOCKET SO_SNDBUF (* 12 1024)) (set-nonblocking! client) |