diff --git a/Propellor/CmdLine.hs b/Propellor/CmdLine.hs
index 9e477d9..ff90b07 100644
--- a/Propellor/CmdLine.hs
+++ b/Propellor/CmdLine.hs
@@ -74,7 +74,8 @@ spin host = do
 				putStr $ "Sending " ++ keyring ++ " to " ++ host ++ "..."
 				hFlush stdout
 				s <- toB64 <$> readFile keyring
-				putStrLn $ toMarked keyringMarker s
+				putStrLn $ show $ toMarked keyringMarker s
+				hFlush stdout
 				hPutStrLn toh $ toMarked keyringMarker s
 				hFlush toh
 				putStrLn "done"