simon/ocaml-opentelemetry
1
0
Fork 0
mirror of https://github.com/ocaml-tracing/ocaml-opentelemetry.git synced 2026-03-08 03:47:59 -04:00
Code Issues Projects Releases Packages Wiki Activity Actions

feat cohttp: set 'accept' header as well

Browse source
This commit is contained in:
Simon Cruanes 2025-09-15 12:25:04 -04:00
parent 9974d6a0b6
commit b2ef68536d
No known key found for this signature in database
GPG key ID: EBFFF6F283F3A2B4
1 changed files with 6 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
src/client-cohttp-lwt/opentelemetry_client_cohttp_lwt.ml
View file

@ -106,7 +106,12 @@ end = struct
let open Cohttp in let open Cohttp in
let headers = Header.(add_list (init ()) (Config.Env.get_headers ())) in let headers = Header.(add_list (init ()) (Config.Env.get_headers ())) in
let headers = let headers =
Header.(add headers "Content-Type" "application/x-protobuf") Header.(
add_list headers
[
"Content-Type", "application/x-protobuf";
"Accept", "application/x-protobuf";
])
in in
let body = Cohttp_lwt.Body.of_string bod in let body = Cohttp_lwt.Body.of_string bod in