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:28:24 -04:00
parent 3f6cb342c6
commit 48b3c546b7
Failed to extract signature
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
Propellor/CmdLine.hs
View File

@ -74,7 +74,8 @@ spin host = do
putStr $ "Sending " ++ keyring ++ " to " ++ host ++ "..." putStr $ "Sending " ++ keyring ++ " to " ++ host ++ "..."
hFlush stdout hFlush stdout
s <- toB64 <$> readFile keyring s <- toB64 <$> readFile keyring
putStrLn $ toMarked keyringMarker s putStrLn $ show $ toMarked keyringMarker s
hFlush stdout
hPutStrLn toh $ toMarked keyringMarker s hPutStrLn toh $ toMarked keyringMarker s
hFlush toh hFlush toh
putStrLn "done" putStrLn "done"