diff options
Diffstat (limited to 'Propellor/CmdLine.hs')
| -rw-r--r-- | Propellor/CmdLine.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Propellor/CmdLine.hs b/Propellor/CmdLine.hs index c267e7d4..d1a758ab 100644 --- a/Propellor/CmdLine.hs +++ b/Propellor/CmdLine.hs @@ -245,14 +245,14 @@ fromMarked marker s matches = filter (marker `isPrefixOf`) $ lines s boot :: [Property] -> IO () -boot props = do +boot ps = do sendMarked stdout statusMarker $ show Ready reply <- hGetContentsStrict stdin makePrivDataDir maybe noop (writeFileProtected privDataLocal) $ fromMarked privDataMarker reply - ensureProperties props + ensureProperties ps addKey :: String -> IO () addKey keyid = exitBool =<< allM id [ gpg, gitadd, gitcommit ] |