aboutsummaryrefslogtreecommitdiff
path: root/Annex.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2012-02-15 11:13:13 -0400
committerGravatar Joey Hess <joey@kitenet.net>2012-02-15 11:14:19 -0400
commit52c5b164d8dee3761b6ad96e3d636f862a2344e3 (patch)
tree71ef23b51d9bea9361cadec70db135f6bd60152d /Annex.hs
parentc26db2625934e315163077d19d814bc71df7ef6e (diff)
Added a annex.queuesize setting
useful when adding hundreds of thousands of files on a system with plenty of memory. git add gets quite slow in such a large repository, so if the system has more than the ~32 mb of memory the queue can use by default, it's a useful optimisation to increase the queue size, in order to decrease the number of times git add is run.
Diffstat (limited to 'Annex.hs')
-rw-r--r--Annex.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/Annex.hs b/Annex.hs
index 534415207..123c9facf 100644
--- a/Annex.hs
+++ b/Annex.hs
@@ -76,12 +76,12 @@ data AnnexState = AnnexState
{ repo :: Git.Repo
, backends :: [BackendA Annex]
, remotes :: [Types.Remote.RemoteA Annex]
- , repoqueue :: Git.Queue.Queue
, output :: OutputType
, force :: Bool
, fast :: Bool
, auto :: Bool
, branchstate :: BranchState
+ , repoqueue :: Maybe Git.Queue.Queue
, catfilehandle :: Maybe CatFileHandle
, checkattrhandle :: Maybe CheckAttrHandle
, forcebackend :: Maybe String
@@ -100,12 +100,12 @@ newState gitrepo = AnnexState
{ repo = gitrepo
, backends = []
, remotes = []
- , repoqueue = Git.Queue.new
, output = NormalOutput
, force = False
, fast = False
, auto = False
, branchstate = startBranchState
+ , repoqueue = Nothing
, catfilehandle = Nothing
, checkattrhandle = Nothing
, forcebackend = Nothing