Upgrade the usage of happy-eyeballs into the git-unix package accordi…

…ng to mimic-happy-eyeballs.0.0.8
mirage · May 31, 2024 · f575ece · f575ece
1 parent 7f99931
commit f575ece
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/src/git-unix/git_unix_mimic.ml b/src/git-unix/git_unix_mimic.ml
@@ -8,8 +8,8 @@ module Happy_eyeballs = struct
 
   let happy_eyeballs = Mimic.make ~name:"happy-eyeballs-lwt"
 
-  let resolve t addr ports =
-    Happy_eyeballs_lwt.connect t addr ports >|= Rresult.R.open_error_msg
+  let resolve t ?aaaa_timeout ?connect_delay ?connect_timeout ?resolve_timeout ?resolve_retries addr ports =
+    Happy_eyeballs_lwt.connect t ?aaaa_timeout ?connect_delay ?connect_timeout ?resolve_timeout ?resolve_retries addr ports >|= Rresult.R.open_error_msg
 end
 
 module TCP = struct