summaryrefslogtreecommitdiff
path: root/Propellor
diff options
context:
space:
mode:
authorJoey Hess2014-03-31 14:08:54 -0400
committerJoey Hess2014-03-31 14:08:54 -0400
commit12c0b5034b2596b1a42d8d714464168070ede200 (patch)
tree7eed7bfb86b687d16727b9fcb169df76fa6859be /Propellor
parent00c8a254bfac7451430199b970c203c9527cd1d2 (diff)
propellor spin
Diffstat (limited to 'Propellor')
-rw-r--r--Propellor/CmdLine.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Propellor/CmdLine.hs b/Propellor/CmdLine.hs
index 838f85de..6b33ae0d 100644
--- a/Propellor/CmdLine.hs
+++ b/Propellor/CmdLine.hs
@@ -71,7 +71,7 @@ spin host = do
status <- getstatus fromh `catchIO` error "protocol error"
case status of
NeedKeyRing -> do
- s <- toB64 readFile keyring
+ s <- toB64 <$> readFile keyring
hPutStrLn toh $ toMarked keyringMarker s
HaveKeyRing -> noop
hPutStrLn toh $ toMarked privDataMarker privdata