From a954e4ff64c20c1e9220200014fa0b9822d5aa42 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Tue, 3 Oct 2017 13:23:10 -0400 Subject: remove redundant definition of lck --- Logs/Transfer.hs | 1 - 1 file changed, 1 deletion(-) (limited to 'Logs') diff --git a/Logs/Transfer.hs b/Logs/Transfer.hs index 0aded154d..3e90ae1ee 100644 --- a/Logs/Transfer.hs +++ b/Logs/Transfer.hs @@ -108,7 +108,6 @@ checkTransfer t = do -- due to permissions problems, races, etc. void $ tryIO $ do mode <- annexFileMode - let lck = transferLockFile tfile r <- tryLockExclusive (Just mode) lck case r of Just lockhandle -> liftIO $ do -- cgit v1.2.3