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

associated files database

Browse source
This commit is contained in:
Joey Hess 2015-12-07 13:42:03 -04:00
parent 63c466449f
commit a6e5ee0d0e
Failed to extract signature
3 changed files with 105 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
Database/Fsck.hs
View file

@ -59,7 +59,7 @@ newPass u = isJust <$> tryExclusiveLock (gitAnnexFsckDbLock u) go
go = liftIO . void . tryIO . removeDirectoryRecursive
=<< fromRepo (gitAnnexFsckDbDir u)
{- Opens the database, creating it atomically if it doesn't exist yet. -}
{- Opens the database, creating it if it doesn't exist yet. -}
openDb :: UUID -> Annex FsckHandle
openDb u = do
dbdir <- fromRepo (gitAnnexFsckDbDir u)