From 85ef413e2ea7c63370d40dbfb9661fd013b5a0f1 Mon Sep 17 00:00:00 2001
From: spaced4ndy <8711996+spaced4ndy@users.noreply.github.com>
Date: Fri, 21 Apr 2023 19:28:33 +0400
Subject: [PATCH] fix

---
 src/Simplex/FileTransfer/Agent.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/Simplex/FileTransfer/Agent.hs b/src/Simplex/FileTransfer/Agent.hs
index 5663c76d5..f66fe09a3 100644
--- a/src/Simplex/FileTransfer/Agent.hs
+++ b/src/Simplex/FileTransfer/Agent.hs
@@ -198,7 +198,7 @@ runXFTPRcvWorker c srv doWork = do
               atomically $ assertAgentForeground c
               loop
             retryDone e = do
-              withStore' c (`deleteSndFileReplica` rcvChunkReplicaId)
+              withStore' c (`deleteRcvFileReplica` rcvChunkReplicaId)
               rcvWorkerInternalError c rcvFileId rcvFileEntityId (Just fileTmpPath) (show e)
     downloadFileChunk :: RcvFileChunk -> RcvFileChunkReplica -> m ()
     downloadFileChunk RcvFileChunk {userId, rcvFileId, rcvFileEntityId, rcvChunkId, chunkNo, chunkSize, digest, fileTmpPath} replica = do