fix

2026-09-17 01:35:12 +00:00 · 2023-11-26 22:03:04 +00:00
parent 18c9ae09f8
commit 28aff6ceec
1 changed files with 2 additions and 2 deletions
@@ -379,8 +379,8 @@ testXFTPAgentDeleteRestore = withGlobalLogging logCfgNoLogs $ do
    rcp1 <- getSMPAgentClient' agentCfg initAgentServers testDB2
    runRight_ . void $
      testReceive rcp1 rfd1 filePath
-    disconnectAgentClient rcp1
-    disconnectAgentClient sndr
+    disposeAgentClient rcp1
+    disposeAgentClient sndr
    pure (sfId, sndDescr, rfd2)

  -- delete file - should not succeed with server down