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

use right handle

Browse source
This commit is contained in:
Joey Hess 2020-06-05 16:38:11 -04:00
parent 0fd72ff8e0
commit 05703893af
No known key found for this signature in database
GPG key ID: DB12DB0FF05F8F38
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
Git/Queue.hs
View file

@ -207,7 +207,7 @@ runAction repo action@(CommandAction {}) = liftIO $ do
where where
gitparams = gitCommandLine gitparams = gitCommandLine
(Param (getSubcommand action):getParams action) repo (Param (getSubcommand action):getParams action) repo
go p _ (Just h) _ pid = do go p (Just h) _ _ pid = do
hPutStr h $ intercalate "\0" $ toCommand $ getFiles action hPutStr h $ intercalate "\0" $ toCommand $ getFiles action
hClose h hClose h
forceSuccessProcess p pid forceSuccessProcess p pid