summaryrefslogtreecommitdiff
path: root/src/Propellor/Property/Systemd.hs
diff options
context:
space:
mode:
authorJoey Hess2016-06-16 22:12:28 -0400
committerJoey Hess2016-06-16 22:12:28 -0400
commitd72333ae80c7331db26b2c622f1b7abeb75e44e8 (patch)
tree7780ef73c2c5f533d30c72589a3edf70763d5774 /src/Propellor/Property/Systemd.hs
parent2ba2b37d975c921b3e80811e77579ff93e7af250 (diff)
response
Diffstat (limited to 'src/Propellor/Property/Systemd.hs')
-rw-r--r--src/Propellor/Property/Systemd.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Propellor/Property/Systemd.hs b/src/Propellor/Property/Systemd.hs
index 78529f73..80346889 100644
--- a/src/Propellor/Property/Systemd.hs
+++ b/src/Propellor/Property/Systemd.hs
@@ -64,10 +64,10 @@ type ServiceName = String
type MachineName = String
-data Container = Container MachineName Chroot.Chroot Host
+data Container metatypes = Container MachineName Chroot.Chroot Host (Property metatypes)
deriving (Show)
-instance IsContainer Container where
+instance IsContainer (Container metatypes) where
containerProperties (Container _ _ h) = containerProperties h
containerInfo (Container _ _ h) = containerInfo h
setContainerProperties (Container n c h) ps = Container n c (setContainerProperties h ps)