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

extend Git.Queue to be able to queue more than simple git commands

Browse source 
While I was in there, I noticed and fixed a bug in the queue size
calculations. It was never encountered only because Queue.add was
only ever run with 1 file in the list.
This commit is contained in:
Joey Hess 2012-06-07 15:19:44 -04:00
parent 727158ff55
commit 0a11b35d89
8 changed files with 94 additions and 43 deletions
Download patch file Download diff file Expand all files Collapse all files

2
Command/Lock.hs
View file

@ -24,5 +24,5 @@ start file = do
perform :: FilePath -> CommandPerform
perform file = do
Annex.Queue.add "checkout" [Param "--"] [file]
Annex.Queue.addCommand "checkout" [Param "--"] [file]
next $ return True -- no cleanup needed