cadey
/
propellor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

propellor spin

This commit is contained in:
Joey Hess 2014-03-31 14:44:38 -04:00
parent a17f5c70a6
commit 02c357de42
Failed to extract signature
1 changed files with 1 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
Propellor/CmdLine.hs
View File

@ -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)