diff --git a/ocsigenserver.opam b/ocsigenserver.opam index 7512cd386..e8d0a1c70 100644 --- a/ocsigenserver.opam +++ b/ocsigenserver.opam @@ -1,6 +1,6 @@ opam-version: "2.0" name: "ocsigenserver" -version: "4.0.1" +version: "4.0.2" maintainer: "dev@ocsigen.org" synopsis: "A full-featured and extensible Web server" description: "Ocsigen Server implements most features of the HTTP protocol, and has a very powerful extension mechanism that makes it very easy to plug your own OCaml modules for generating pages. Many extensions are already implemented, like a reverse proxy, content compression, access control, authentication, etc." diff --git a/src/server/ocsigen_request.ml b/src/server/ocsigen_request.ml index 2b855dd1c..5e55590b1 100644 --- a/src/server/ocsigen_request.ml +++ b/src/server/ocsigen_request.ml @@ -174,7 +174,9 @@ let update match post_data with | Some (Some post_data) -> ref (`Parsed (Lwt.return post_data)) - | None | Some None -> + | Some None -> + ref (`Parsed (Lwt.return ([], []))) + | None -> r_body and r_cookies_override = match cookies_override with