X-Git-Url: https://jxself.org/git/?a=blobdiff_plain;ds=sidebyside;f=8sync%2Fsystems%2Fweb.scm;h=6b8d14fead504f8d391220c82288e68a7f150b1e;hb=80d96fb807e55e14cf0cd0738ae8ae5b14288dc4;hp=5d3ad3a79695f5c1cda5d0d23364c7a9562782da;hpb=0de8ac7a40e29cbc84924936faa13acf7c5f29db;p=8sync.git 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)