mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages 1 Wiki Activity Actions

lock before writing to the ContentIdentifier db

Browse source
This commit is contained in:
Joey Hess 2019-03-04 16:47:30 -04:00
parent aaacf431d8
commit 00722ba1f8
No known key found for this signature in database
GPG key ID: DB12DB0FF05F8F38
1 changed files with 2 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

1
Annex/Import.hs
View file

@ -217,6 +217,7 @@ downloadImport remote importtreeconfig importablecontents = do
-- importablecontents (eg when it has a history), -- importablecontents (eg when it has a history),
-- they will only be downloaded once. -- they will only be downloaded once.
cidmap <- liftIO $ newTVarIO M.empty cidmap <- liftIO $ newTVarIO M.empty
withExclusiveLock gitAnnexContentIdentifierLock $
bracket CID.openDb CID.closeDb (go cidmap importablecontents) bracket CID.openDb CID.closeDb (go cidmap importablecontents)
-- TODO really support concurrency; avoid donwloading the same -- TODO really support concurrency; avoid donwloading the same
-- ContentIdentifier twice. -- ContentIdentifier twice.