xftp agent: update chunk delay (#671)

This commit is contained in:
spaced4ndy authored and GitHub committed 2023-03-03 20:39:15 +04:00
1 parent cc38deb65d
commit a0c86158d9
6 files changed
+23 -19

No files matched your search

+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} =