summaryrefslogtreecommitdiff
path: root/Annex/Locations.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joeyh@joeyh.name>2016-07-17 12:11:05 -0400
committerGravatar Joey Hess <joeyh@joeyh.name>2016-07-17 12:24:34 -0400
commit535697fb264705c6a7b291e0b4a2caa630f55d6a (patch)
tree4c791dfd97c0c74842d852df7724a92db6a839d5 /Annex/Locations.hs
parent90764f2baece55ee596175ee6554401aee4651ab (diff)
Speed up startup time by caching the refs that have been merged into the git-annex branch.
This can speed up git-annex commands by as much as a second, depending on the number of remotes.
Diffstat (limited to 'Annex/Locations.hs')
-rw-r--r--Annex/Locations.hs5
1 files changed, 5 insertions, 0 deletions
diff --git a/Annex/Locations.hs b/Annex/Locations.hs
index 9b3856602..058993cd2 100644
--- a/Annex/Locations.hs
+++ b/Annex/Locations.hs
@@ -52,6 +52,7 @@ module Annex.Locations (
gitAnnexIndexStatus,
gitAnnexViewIndex,
gitAnnexViewLog,
+ gitAnnexMergedRefs,
gitAnnexIgnoredRefs,
gitAnnexPidFile,
gitAnnexPidLockFile,
@@ -357,6 +358,10 @@ gitAnnexViewIndex r = gitAnnexDir r </> "viewindex"
gitAnnexViewLog :: Git.Repo -> FilePath
gitAnnexViewLog r = gitAnnexDir r </> "viewlog"
+{- List of refs that have already been merged into the git-annex branch. -}
+gitAnnexMergedRefs :: Git.Repo -> FilePath
+gitAnnexMergedRefs r = gitAnnexDir r </> "mergedrefs"
+
{- List of refs that should not be merged into the git-annex branch. -}
gitAnnexIgnoredRefs :: Git.Repo -> FilePath
gitAnnexIgnoredRefs r = gitAnnexDir r </> "ignoredrefs"