diff options
Diffstat (limited to 'Locations.hs')
-rw-r--r-- | Locations.hs | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/Locations.hs b/Locations.hs index 02995ee4a..0cd57aa98 100644 --- a/Locations.hs +++ b/Locations.hs @@ -57,6 +57,7 @@ module Locations ( gitAnnexSshDir, gitAnnexRemotesDir, gitAnnexAssistantDefaultDir, + gitAnnexFsckDb, isLinkToAnnex, HashLevels(..), hashDirMixed, @@ -340,6 +341,10 @@ gitAnnexRemotesDir r = addTrailingPathSeparator $ gitAnnexDir r </> "remotes" gitAnnexAssistantDefaultDir :: FilePath gitAnnexAssistantDefaultDir = "annex" +{- Database used to record fsck info. -} +gitAnnexFsckDb :: Git.Repo -> FilePath +gitAnnexFsckDb r = gitAnnexDir r </> "fsck.db" + {- Checks a symlink target to see if it appears to point to annexed content. - - We only look at paths inside the .git directory, and not at the .git |