cadey
/
propellor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

propellor spin

This commit is contained in:
Joey Hess 2015-01-04 17:04:26 -04:00
parent 08b45ad6f6
commit f0b6ce9702
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
src/Propellor/Property/Ssh.hs
View File

@ -99,7 +99,7 @@ hostKeys ctx l = propertyList desc $ catMaybes $
removestale b = map (File.notPresent . flip keyFile b) staletypes removestale b = map (File.notPresent . flip keyFile b) staletypes
cleanup cleanup
| null staletypes = Nothing | null staletypes = Nothing
| otherwise = Just $ property ("stale keys removed " ++ typelist staletypes) $ | otherwise = Just $ property ("stale host keys removed " ++ typelist staletypes) $
ensureProperty $ ensureProperty $
combineProperties desc (removestale True ++ removestale False) combineProperties desc (removestale True ++ removestale False)
`onChange` restarted `onChange` restarted