diff options
Diffstat (limited to 'pkgs/development/ocaml-modules/ocsigen-server/cohttp-5.patch')
-rw-r--r-- | pkgs/development/ocaml-modules/ocsigen-server/cohttp-5.patch | 31 |
1 files changed, 0 insertions, 31 deletions
diff --git a/pkgs/development/ocaml-modules/ocsigen-server/cohttp-5.patch b/pkgs/development/ocaml-modules/ocsigen-server/cohttp-5.patch deleted file mode 100644 index 44ade8da929..00000000000 --- a/pkgs/development/ocaml-modules/ocsigen-server/cohttp-5.patch +++ /dev/null @@ -1,31 +0,0 @@ -diff --git a/src/server/ocsigen_cohttp.ml b/src/server/ocsigen_cohttp.ml -index 4363cff7..b0cc0c53 100644 ---- a/src/server/ocsigen_cohttp.ml -+++ b/src/server/ocsigen_cohttp.ml -@@ -14,25 +14,13 @@ exception Ext_http_error of - - let _print_request fmt request = - -- let print_list print_data out_ch lst = -- let rec aux = function -- | [] -> () -- | [ x ] -> print_data out_ch x -- | x :: r -> print_data out_ch x; aux r -- in aux lst -- in -- - Format.fprintf fmt "%s [%s/%s]:\n" - (Uri.to_string (Cohttp.Request.uri request)) - Cohttp.(Code.string_of_version (Request.version request)) - Cohttp.(Code.string_of_method (Request.meth request)); - - Cohttp.Header.iter -- (fun key values -> -- (print_list -- (fun fmt value -> Format.fprintf fmt "\t%s = %s\n" key value) -- fmt -- values)) -+ (Format.fprintf fmt "\t%s = %s\n") - (Cohttp.Request.headers request) - - let connections = Hashtbl.create 256 |