From 12c0b5034b2596b1a42d8d714464168070ede200 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Mon, 31 Mar 2014 14:08:54 -0400 Subject: propellor spin --- Propellor/CmdLine.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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 -- cgit v1.2.3