summaryrefslogtreecommitdiff
path: root/src/Propellor/Property/ControlHeir.hs
diff options
context:
space:
mode:
authorJoey Hess2015-10-20 23:37:21 -0400
committerJoey Hess2015-10-20 23:37:21 -0400
commit0e39d53352b982022747e451676bc6a66e3d9acc (patch)
tree37f84bb464b71437d7ff90c571d1f127a8127edb /src/Propellor/Property/ControlHeir.hs
parent745f42c1499749345c32736342959584587c9b57 (diff)
refactor
Diffstat (limited to 'src/Propellor/Property/ControlHeir.hs')
-rw-r--r--src/Propellor/Property/ControlHeir.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Propellor/Property/ControlHeir.hs b/src/Propellor/Property/ControlHeir.hs
index 9fd2ce43..ce993a02 100644
--- a/src/Propellor/Property/ControlHeir.hs
+++ b/src/Propellor/Property/ControlHeir.hs
@@ -179,8 +179,8 @@ controllerFor h = infoProperty desc go (mkControllingInfo h <> privinfo) []
getInfo (hostInfo h)
go = do
- pm <- liftIO $ filterPrivData h . readPrivData
- <$> readFileStrictAnyEncoding privDataLocal
+ pm <- liftIO $ filterPrivData h
+ <$> readPrivDataFile privDataLocal
liftIO $ spin' (Just pm) Nothing (hostName h) h
-- Don't know if the spin made a change to
-- the remote host or not, but in any case,