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:08:54 -04:00
parent 00c8a254bf
commit 12c0b5034b
Failed to extract signature
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
Propellor/CmdLine.hs
View File

@ -71,7 +71,7 @@ spin host = do
status <- getstatus fromh `catchIO` error "protocol error" status <- getstatus fromh `catchIO` error "protocol error"
case status of case status of
NeedKeyRing -> do NeedKeyRing -> do
s <- toB64 readFile keyring s <- toB64 <$> readFile keyring
hPutStrLn toh $ toMarked keyringMarker s hPutStrLn toh $ toMarked keyringMarker s
HaveKeyRing -> noop HaveKeyRing -> noop
hPutStrLn toh $ toMarked privDataMarker privdata hPutStrLn toh $ toMarked privDataMarker privdata