diff --git a/Propellor/CmdLine.hs b/Propellor/CmdLine.hs index 9708815..83ef8cb 100644 --- a/Propellor/CmdLine.hs +++ b/Propellor/CmdLine.hs @@ -149,7 +149,8 @@ boot props = do hFlush stdout reply <- hGetContentsStrict stdin - hPutStrLn stderr $ show $ B64.decode . BL.pack . s2w8 <$> fromMarked keyringMarker reply + hPutStrLn stderr $ show $ B64.decode . BL.pack . s2w8 . takeWhile (/= '\n') + <$> fromMarked keyringMarker reply hFlush stderr makePrivDataDir