From 5948c7b2565465bcaf114f836711dbba93d33d22 Mon Sep 17 00:00:00 2001 From: totoro Date: Wed, 6 Jan 2021 18:45:45 +0900 Subject: [PATCH] The write function has now a timeout argument in third position --- mail/smtp_client.anubis | 2 +- net_services/send_file.anubis | 5 ++--- 2 files changed, 3 insertions(+), 4 deletions(-) diff --git a/mail/smtp_client.anubis b/mail/smtp_client.anubis index a18072b..bfc1ca1 100644 --- a/mail/smtp_client.anubis +++ b/mail/smtp_client.anubis @@ -402,7 +402,7 @@ define Maybe(One) Int buffer_start_time, (LogLevel, String) -> One logger )= - if write( target , buffer) is + if write( target , buffer, 10) is { failure then failure, success(nb_write) then diff --git a/net_services/send_file.anubis b/net_services/send_file.anubis index 4ffea70..96e0d1a 100644 --- a/net_services/send_file.anubis +++ b/net_services/send_file.anubis @@ -43,9 +43,8 @@ define Maybe(One) with read_size = min(65536, left_read), if read(src_file, read_size, 10) is { - error then logger(logError, "send_file_state read error");failure, - timeout then logger(logError, "send_file_state timeout");failure, - ok(buffer)then + failure then logger(logError, "send_file_state read error");failure, + success(buffer) then with data_msg = message(_CXM_FTP_DATA), if add_raw(data_msg, "Data", buffer) is { -- libgit2 0.21.4