fix tests after renaming Http_config

This commit is contained in:
Simon Cruanes 2025-12-16 08:31:51 -05:00
parent 03c687b8b3
commit b4c8803931
No known key found for this signature in database
GPG key ID: EBFFF6F283F3A2B4
3 changed files with 3 additions and 3 deletions

View file

@ -23,7 +23,7 @@ let run () =
let module C = (val mk_client ~scope) in
(* Using the same default server O *)
let* _res, body =
C.get (Uri.of_string Opentelemetry_client.Client_config.default_url)
C.get (Uri.of_string Opentelemetry_client.Http_config.default_url)
in
let* () = Cohttp_lwt.Body.drain_body body in
go ()

View file

@ -1,5 +1,5 @@
open Alcotest
module Config = Opentelemetry_client.Client_config
module Config = Opentelemetry_client.Http_config
let test_config_printing () =
let module Env = Config.Env () in

View file

@ -111,7 +111,7 @@ module Tested_program = struct
end
let default_port =
String.split_on_char ':' Client.Client_config.default_url |> function
String.split_on_char ':' Client.Http_config.default_url |> function
(* Extracting the port from 'http://foo:<port>' *)
| [ _; _; port ] -> int_of_string port
| _ -> failwith "unexpected format in Client.Config.default_url"