cadey
/
propellor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

updte

This commit is contained in:
Joey Hess 2014-11-18 15:20:07 -04:00
parent 3d98e31919
commit 72e8086d7e
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/Propellor/CmdLine.hs
View File

@ -306,7 +306,7 @@ boot = do
-- reads from the second fd and sends it to stdout. -- reads from the second fd and sends it to stdout.
gitPush :: Fd -> Fd -> IO () gitPush :: Fd -> Fd -> IO ()
gitPush hin hout = do gitPush hin hout = do
print ("gitPush", hin, hout) hPutStrLn stderr $ show ("gitPush", hin, hout)
void $ fromstdin `concurrently` tostdout void $ fromstdin `concurrently` tostdout
where where
fromstdin = do fromstdin = do