ocamlPackages.ocsigen_server: fix for conduit 7.1.0
This commit is contained in:
committed by
Vincent Laporte
parent
cc64e7b43f
commit
9e11985be4
@@ -0,0 +1,14 @@
|
||||
diff --git a/src/server/ocsigen_cohttp.ml b/src/server/ocsigen_cohttp.ml
|
||||
index 66895339..edbfcbf2 100644
|
||||
--- a/src/server/ocsigen_cohttp.ml
|
||||
+++ b/src/server/ocsigen_cohttp.ml
|
||||
@@ -105,7 +105,8 @@ let handler ~ssl ~address ~port ~connector (flow, conn) request body =
|
||||
let rec getsockname = function
|
||||
| `TCP (ip, port) -> Unix.ADDR_INET (Ipaddr_unix.to_inet_addr ip, port)
|
||||
| `Unix_domain_socket path -> Unix.ADDR_UNIX path
|
||||
- | `TLS (_, edn) -> getsockname edn
|
||||
+ | `TLS (_, edn) -> getsockname (edn :> Conduit_lwt_unix.endp)
|
||||
+ | `TLS_tunnel _ -> raise (Failure "TLS tunnel not supported")
|
||||
| `Unknown err -> raise (Failure ("resolution failed: " ^ err))
|
||||
| `Vchan_direct _ -> raise (Failure "VChan not supported")
|
||||
| `Vchan_domain_socket _ -> raise (Failure "VChan not supported")
|
||||
@@ -64,6 +64,8 @@ buildDunePackage rec {
|
||||
hash = "sha256-T3bgPZpDO6plgebLJDBtBuR2eR/bN3o24UAUv1VwgtI=";
|
||||
};
|
||||
|
||||
patches = [ ./conduit.patch ];
|
||||
|
||||
nativeBuildInputs = [
|
||||
makeWrapper
|
||||
which
|
||||
|
||||
Reference in New Issue
Block a user