fix build

This commit is contained in:
Joey Hess 2012-10-24 10:54:58 -04:00
parent 269344ae71
commit ee24f23ecb

View file

@ -111,7 +111,7 @@ bupSplitParams r buprepo k src = do
let os = map Param $ words o
showOutput -- make way for bup output
return $ bupParams "split" buprepo
(os ++ [Param "-n", Param (bupRef k), src])
(os ++ [Param "-n", Param (bupRef k)] ++ src)
store :: Git.Repo -> BupRepo -> Key -> AssociatedFile -> MeterUpdate -> Annex Bool
store r buprepo k _f _p = do