diff options
Diffstat (limited to 'AnnexQueue.hs')
-rw-r--r-- | AnnexQueue.hs | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/AnnexQueue.hs b/AnnexQueue.hs index 4c35adfb8..b1678df07 100644 --- a/AnnexQueue.hs +++ b/AnnexQueue.hs @@ -21,10 +21,10 @@ import Utility {- Adds a git command to the queue, possibly running previously queued - actions if enough have accumulated. -} -add :: String -> [CommandParam] -> FilePath -> Annex () -add command params file = do +add :: String -> [CommandParam] -> [FilePath] -> Annex () +add command params files = do q <- getState repoqueue - store $ Git.Queue.add q command params file + store $ Git.Queue.add q command params files {- Runs the queue if it is full. Should be called periodically. -} flushWhenFull :: Annex () |