propellor spin
This commit is contained in:
parent
9a1fffdead
commit
3f6cb342c6
|
@ -74,6 +74,7 @@ spin host = do
|
|||
putStr $ "Sending " ++ keyring ++ " to " ++ host ++ "..."
|
||||
hFlush stdout
|
||||
s <- toB64 <$> readFile keyring
|
||||
putStrLn $ toMarked keyringMarker s
|
||||
hPutStrLn toh $ toMarked keyringMarker s
|
||||
hFlush toh
|
||||
putStrLn "done"
|
||||
|
|
Loading…
Reference in New Issue