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

couple more warning fixes

Browse source
This commit is contained in:
Joey Hess 2014-02-25 14:53:43 -04:00
parent e1cf4e5e4e
commit f8cfcd4e44
2 changed files with 2 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

2
Git/Queue.hs
View file

@ -148,7 +148,7 @@ runAction :: Repo -> Action -> IO ()
runAction repo (UpdateIndexAction streamers) =
-- list is stored in reverse order
Git.UpdateIndex.streamUpdateIndex repo $ reverse streamers
runAction repo action@(CommandAction {}) =
runAction repo action@(CommandAction {}) = do
#ifndef mingw32_HOST_OS
let p = (proc "xargs" $ "-0":"git":toCommand gitparams) { env = gitEnv repo }
withHandle StdinHandle createProcessSuccess p $ \h -> do