diff options
| author |  Joey Hess <joeyh@joeyh.name> | 2015-10-09 16:55:41 -0400 |
|---|---|---|
| committer | Joey Hess <joeyh@joeyh.name> | 2015-10-09 16:55:41 -0400 |
| commit | 43efb9173bbf23d35106d980fc36c07c6c29a4e6 (patch) | |
| tree | dbbcfbaf7df02f0679753b85072c993ba5c6459e /Annex/Content.hs | |
| parent | 8bb2283a50771025b5a9a729f4e832211e4990ee (diff) | |
implement lockContent for ssh remotes
Diffstat (limited to 'Annex/Content.hs')
| -rw-r--r-- | Annex/Content.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Annex/Content.hs b/Annex/Content.hs index 0dc47d9e2..0b15ce53b 100644 --- a/Annex/Content.hs +++ b/Annex/Content.hs @@ -184,7 +184,7 @@ contentLockFile key = Just <$> calcRepo (gitAnnexContentLock key) lockContentShared :: Key -> (VerifiedCopy -> Annex a) -> Annex a lockContentShared key a = lockContentUsing lock key $ do u <- getUUID - withVerifiedCopy LockedCopy u a + withVerifiedCopy LockedCopy u (return True) a where #ifndef mingw32_HOST_OS lock contentfile Nothing = liftIO $ tryLockShared Nothing contentfile |