From b7654c1c591454247fdf0d56e1fd8f20e9ec6c9e Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Mon, 18 Mar 2013 22:41:16 -0400 Subject: ensure --- Assistant/Threads/Transferrer.hs | 2 ++ 1 file changed, 2 insertions(+) (limited to 'Assistant/Threads') diff --git a/Assistant/Threads/Transferrer.hs b/Assistant/Threads/Transferrer.hs index 2c487657a..1720b4c9c 100644 --- a/Assistant/Threads/Transferrer.hs +++ b/Assistant/Threads/Transferrer.hs @@ -99,6 +99,8 @@ startTransfer program t info = case (transferRemote info, associatedFile info) o (associatedFile info) (Just remote) recordCommit + + void $ removeTransfer t where params = [ Param "transferkey" -- cgit v1.2.3