From d2d85bd19c804f48602ccf5abdca6c241d064081 Mon Sep 17 00:00:00 2001
From: ComanderP <8596680+ComanderP@users.noreply.github.com>
Date: Tue, 7 May 2024 19:10:30 +0200
Subject: [PATCH] Fix missing arguments in send_all and send_msg_all

---
 zmq-eio/src/socket.ml | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/zmq-eio/src/socket.ml b/zmq-eio/src/socket.ml
index cd13642..a831745 100644
--- a/zmq-eio/src/socket.ml
+++ b/zmq-eio/src/socket.ml
@@ -122,11 +122,11 @@ let send t message =
 let send_msg t message =
   request t t.senders (fun () -> Zmq.Socket.send_msg ~block:false t.socket message)
 
-let send_all t =
-  request t t.senders (fun () -> Zmq.Socket.send_all ~block:false t.socket)
+let send_all t messages =
+  request t t.senders (fun () -> Zmq.Socket.send_all ~block:false t.socket messages)
 
-let send_msg_all t =
-  request t t.senders (fun () -> Zmq.Socket.send_msg_all ~block:false t.socket)
+let send_msg_all t messages =
+  request t t.senders (fun () -> Zmq.Socket.send_msg_all ~block:false t.socket messages)
 
 let recv t =
   request t t.receivers (fun () -> Zmq.Socket.recv ~block:false t.socket)