diff --git a/collects/web-server/private/request.ss b/collects/web-server/private/request.ss index aeee1aa9ad..af1a4ff081 100644 --- a/collects/web-server/private/request.ss +++ b/collects/web-server/private/request.ss @@ -177,7 +177,7 @@ (network-error 'read-bindings "Post request contained a non-numeric content-length")])] [#f (let ([raw-bytes (apply bytes-append (read-to-eof in))]) - (parse-bindings raw-bytes))])])] + (values (parse-bindings raw-bytes) raw-bytes))])])] [meth (values empty #f)]))