From 099bfc2dafb2c235187035e44290a3369bb46192 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Tue, 3 Oct 2017 13:23:10 -0400 Subject: [PATCH] remove redundant definition of lck --- Logs/Transfer.hs | 1 - 1 file changed, 1 deletion(-) diff --git a/Logs/Transfer.hs b/Logs/Transfer.hs index 0aded154d7..3e90ae1ee2 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