diff options
author | Joey Hess <joeyh@joeyh.name> | 2016-03-14 15:58:46 -0400 |
---|---|---|
committer | Joey Hess <joeyh@joeyh.name> | 2016-03-14 15:58:46 -0400 |
commit | 90db9740d0d64b34f2e46f57f8aaca235088734c (patch) | |
tree | ac4d7e1b03bfcc337d02569acb87a1481f610746 /Annex.hs | |
parent | 9b29bd39c8dbf23bdf6930b51aba13992ccc49de (diff) |
Sped up git-annex add in direct mode and v6 by using git hash-object --batch.
Speeds up hashSymlink and hashPointerFile.
Diffstat (limited to 'Annex.hs')
-rw-r--r-- | Annex.hs | 3 |
1 files changed, 3 insertions, 0 deletions
@@ -42,6 +42,7 @@ import qualified Git import qualified Git.Config import Annex.Fixup import Git.CatFile +import Git.HashObject import Git.CheckAttr import Git.CheckIgnore import qualified Git.Hook @@ -106,6 +107,7 @@ data AnnexState = AnnexState , branchstate :: BranchState , repoqueue :: Maybe Git.Queue.Queue , catfilehandles :: M.Map FilePath CatFileHandle + , hashobjecthandle :: Maybe HashObjectHandle , checkattrhandle :: Maybe CheckAttrHandle , checkignorehandle :: Maybe (Maybe CheckIgnoreHandle) , forcebackend :: Maybe String @@ -151,6 +153,7 @@ newState c r = AnnexState , branchstate = startBranchState , repoqueue = Nothing , catfilehandles = M.empty + , hashobjecthandle = Nothing , checkattrhandle = Nothing , checkignorehandle = Nothing , forcebackend = Nothing |