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

performance fix

Browse source 
It was checking if it needed to merge on every branch access, fix it to
only check once.
This commit is contained in:
Joey Hess 2011-10-07 13:38:56 -04:00
parent 44fc358885
commit 82e655efd0
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
Annex/Branch.hs
View file

@ -153,8 +153,8 @@ update = do
-} -}
liftIO $ Git.UnionMerge.merge_index g branches liftIO $ Git.UnionMerge.merge_index g branches
liftIO $ Git.commit g "update" fullname (nub $ fullname:refs) liftIO $ Git.commit g "update" fullname (nub $ fullname:refs)
Annex.changeState $ \s -> s { Annex.branchstate = state { branchUpdated = True } }
invalidateCache invalidateCache
Annex.changeState $ \s -> s { Annex.branchstate = state { branchUpdated = True } }
where where
changedbranch (_, branch) = do changedbranch (_, branch) = do
g <- gitRepo g <- gitRepo