diff --git a/src/Propellor/CmdLine.hs b/src/Propellor/CmdLine.hs
index 1cf28d8..dcdc64f 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