pkgs/development/ocaml-modules/ocsigen-server/conduit.patch

   1 diff --git a/src/server/ocsigen_cohttp.ml b/src/server/ocsigen_cohttp.ml
   2 index 66895339..edbfcbf2 100644
   3 --- a/src/server/ocsigen_cohttp.ml
   4 +++ b/src/server/ocsigen_cohttp.ml
   5 @@ -105,7 +105,8 @@ let handler ~ssl ~address ~port ~connector (flow, conn) request body =
   6    let rec getsockname = function
   7      | `TCP (ip, port) -> Unix.ADDR_INET (Ipaddr_unix.to_inet_addr ip, port)
   8      | `Unix_domain_socket path -> Unix.ADDR_UNIX path
   9 -    | `TLS (_, edn) -> getsockname edn
  10 +    | `TLS (_, edn) -> getsockname (edn :> Conduit_lwt_unix.endp)
  11 +    | `TLS_tunnel _ -> raise (Failure "TLS tunnel not supported")
  12      | `Unknown err -> raise (Failure ("resolution failed: " ^ err))
  13      | `Vchan_direct _ -> raise (Failure "VChan not supported")
  14      | `Vchan_domain_socket _ -> raise (Failure "VChan not supported")