From 8ae2ae577a98d5a5fc3ba611d89be216843c2449 Mon Sep 17 00:00:00 2001
From: Simon Cruanes <simon.cruanes.2007@m4x.org>
Date: Mon, 3 Oct 2022 12:43:37 -0400
Subject: [PATCH] fix warning

---
 tests/bin/cohttp_client.ml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/tests/bin/cohttp_client.ml b/tests/bin/cohttp_client.ml
index 3bf9634d..6f695287 100644
--- a/tests/bin/cohttp_client.ml
+++ b/tests/bin/cohttp_client.ml
@@ -22,7 +22,7 @@ let run () =
     in
     let* () = Lwt_unix.sleep !sleep_outer in
     let module C = (val mk_client ~scope) in
-    let* res, body =
+    let* _res, body =
       C.get (Uri.of_string "https://enec1hql02hz.x.pipedream.net")
     in
     let* () = Cohttp_lwt.Body.drain_body body in