From 72e8086d7e3287274f6280eaf9ddf4b8ed578470 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Tue, 18 Nov 2014 15:20:07 -0400 Subject: updte --- src/Propellor/CmdLine.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src') diff --git a/src/Propellor/CmdLine.hs b/src/Propellor/CmdLine.hs index 1cf28d8e..dcdc64fb 100644 --- a/src/Propellor/CmdLine.hs +++ b/src/Propellor/CmdLine.hs @@ -306,7 +306,7 @@ boot = do -- reads from the second fd and sends it to stdout. gitPush :: Fd -> Fd -> IO () gitPush hin hout = do - print ("gitPush", hin, hout) + hPutStrLn stderr $ show ("gitPush", hin, hout) void $ fromstdin `concurrently` tostdout where fromstdin = do -- cgit v1.2.3