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

flip for clarity

Browse source
This commit is contained in:
Joey Hess 2013-12-16 16:24:57 -04:00
parent 58c7b0a56d
commit b7e3fe2ebd
1 changed files with 3 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
Assistant/Threads/Committer.hs
View file

@ -98,13 +98,13 @@ waitChangeTime a = waitchanges 0
case (lastcommitsize >= maxCommitSize, shouldCommit scanning now len changes, possiblyrename changes) of case (lastcommitsize >= maxCommitSize, shouldCommit scanning now len changes, possiblyrename changes) of
(True, True, _) (True, True, _)
| len > maxCommitSize -> | len > maxCommitSize ->
waitchanges =<< a (changes, now) a (changes, now) >>= waitchanges
| otherwise -> aftermaxcommit changes | otherwise -> aftermaxcommit changes
(_, True, False) -> (_, True, False) ->
waitchanges =<< a (changes, now) a (changes, now) >>= waitchanges
(_, True, True) -> do (_, True, True) -> do
morechanges <- getrelatedchanges changes morechanges <- getrelatedchanges changes
waitchanges =<< a (changes ++ morechanges, now) a (changes ++ morechanges, now) >>= waitchanges
_ -> do _ -> do
refill changes refill changes
waitchanges lastcommitsize waitchanges lastcommitsize