Merge pull request #207 from ocsigen/fixcohttp

Fix cohttp version of Ocsigen_request.update

Author: balat

ocsigenserver.opam

@@ -1,6 +1,6 @@
 opam-version: "2.0"
 name: "ocsigenserver"
-version: "4.0.1"
+version: "4.0.2"
 maintainer: "[email protected]"
 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."

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