diff options
| author | Joey Hess <joey@kitenet.net> | 2014-03-31 14:44:38 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2014-03-31 14:44:38 -0400 |
| commit | 02c357de4242318c4b9f546f1f757bc7cea3bf61 (patch) | |
| tree | e8bd7d1b7347ba05593f3d9d309025057c9180bd | |
| parent | a17f5c70a64e8ea1d1153ae1112186537e485d7c (diff) | |
propellor spin
| -rw-r--r-- | Propellor/CmdLine.hs | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/Propellor/CmdLine.hs b/Propellor/CmdLine.hs index eff279d0..1827f8a9 100644 --- a/Propellor/CmdLine.hs +++ b/Propellor/CmdLine.hs @@ -78,8 +78,6 @@ spin host = do hFlush stdout s <- w82s . BL.unpack . B64.encode <$> BL.readFile keyring - putStrLn $ show $ toMarked keyringMarker s - hFlush stdout hPutStrLn toh $ toMarked keyringMarker s hFlush toh putStrLn "done" @@ -116,7 +114,7 @@ spin host = do showremote l getstatus h Just status -> return status - showremote s = putStrLn $ host ++ ": " ++ s + showremote s = putStrLn s data BootStrapStatus = HaveKeyRing | NeedKeyRing deriving (Read, Show, Eq) |