xftp agent: update chunk delay (#671)

This commit is contained in:
spaced4ndy
2023-03-03 20:39:15 +04:00
committed by GitHub
parent cc38deb65d
commit a0c86158d9
6 changed files with 23 additions and 19 deletions
+1 -1
View File
@@ -110,7 +110,7 @@ getXFTPServerClient XFTPClientAgent {xftpClients, config} srv = do
throwError e
tryConnectAsync :: ME ()
tryConnectAsync = void . async $ do
withRetryInterval (reconnectInterval config) $ void . tryConnectClient
withRetryInterval (reconnectInterval config) $ \_ loop -> void $ tryConnectClient loop
showServer :: XFTPServer -> Text
showServer ProtocolServer {host, port} =