diff --git a/spl/httpserver/base.spl b/spl/httpserver/base.spl index bbf020a..8fc5eaf 100644 --- a/spl/httpserver/base.spl +++ b/spl/httpserver/base.spl @@ -64,7 +64,7 @@ construct net:http:server:Request { 4 stop 0 } pop } - this:head buf:sub<0 found> aadd:to-str this:=head + this:head buf:sub<0 found>:replace<"\r" :to-bytes 0 banew> aadd:to-str this:=head buf:sub this:=body this }