diff --git a/tezt/lib_tezos/RPC_legacy.ml b/tezt/lib_tezos/RPC_legacy.ml
index 8d02b2668877db342b6b01b750d067e004ab7548..46996e6ba8c9f9e0cd668e6cade168a9edb31b34 100644
--- a/tezt/lib_tezos/RPC_legacy.ml
+++ b/tezt/lib_tezos/RPC_legacy.ml
@@ -217,17 +217,18 @@ module Curl = struct
     let* output = Process.check_and_read_stdout process in
     return (JSON.parse ~origin:url output)
 
-  let get ?(args = []) url =
-    let process = Process.spawn "curl" (args @ ["-s"; url]) in
+  let get ?runner ?(args = []) url =
+    let process = Process.spawn ?runner "curl" (args @ ["-s"; url]) in
     Runnable.{value = process; run = parse url}
 
-  let get_raw ?(args = []) url =
-    let process = Process.spawn "curl" (args @ ["-s"; url]) in
+  let get_raw ?runner ?(args = []) url =
+    let process = Process.spawn ?runner "curl" (args @ ["-s"; url]) in
     Runnable.{value = process; run = Process.check_and_read_stdout}
 
-  let post ?(args = []) url data =
+  let post ?runner ?(args = []) url data =
     let process =
       Process.spawn
+        ?runner
         "curl"
         (args
         @ [
diff --git a/tezt/lib_tezos/RPC_legacy.mli b/tezt/lib_tezos/RPC_legacy.mli
index e3d9dd8751044b6f74732b3e0057c2252f1e903c..a226956271ce71855c4f089a5ac50274b4a0aed3 100644
--- a/tezt/lib_tezos/RPC_legacy.mli
+++ b/tezt/lib_tezos/RPC_legacy.mli
@@ -197,15 +197,22 @@ module Curl : sig
 
       Fails if [curl] is not found in path.
   *)
-  val get : ?args:string list -> string -> JSON.t Runnable.process
+  val get :
+    ?runner:Runner.t -> ?args:string list -> string -> JSON.t Runnable.process
 
   (** Same as [get] but does not parse the returned value *)
-  val get_raw : ?args:string list -> string -> string Runnable.process
+  val get_raw :
+    ?runner:Runner.t -> ?args:string list -> string -> string Runnable.process
 
   (** [post url data] returns a runnable posting [data] to [url] with curl.
 
       The response is parsed and returned as JSON.
 
       Fails if [curl] is not found in path. *)
-  val post : ?args:string list -> string -> JSON.t -> JSON.t Runnable.process
+  val post :
+    ?runner:Runner.t ->
+    ?args:string list ->
+    string ->
+    JSON.t ->
+    JSON.t Runnable.process
 end