diff --git a/http-mirage-client.opam b/http-mirage-client.opam index e687a51..912afb0 100644 --- a/http-mirage-client.opam +++ b/http-mirage-client.opam @@ -21,7 +21,7 @@ depends: [ "mirage-clock-unix" {with-test} "mirage-crypto-rng" {with-test} "mirage-time-unix" {with-test} - "h2" + "h2" {>= "0.10.0"} ] build: [ ["dune" "subst"] {dev} diff --git a/src/http_mirage_client.ml b/src/http_mirage_client.ml index 7911fc7..fc63120 100644 --- a/src/http_mirage_client.ml +++ b/src/http_mirage_client.ml @@ -257,7 +257,7 @@ let single_h2_request | `Exn e -> Error (`Msg ("Exception here: " ^ Printexc.to_string e)) in wakeup err in let conn = - H2.Client_connection.create ?config ?push_handler:None ~error_handler in + H2.Client_connection.create ?config ?push_handler:None ~error_handler () in let request_body = H2.Client_connection.request conn req ~error_handler ~response_handler in Lwt.async (fun () -> Paf.run (module H2.Client_connection) conn flow)