summaryrefslogtreecommitdiff
path: root/src/Propellor/Property/Systemd.hs
diff options
context:
space:
mode:
authorJoey Hess <joeyh@joeyh.name>2015-10-10 15:17:15 -0400
committerJoey Hess <joeyh@joeyh.name>2015-10-10 15:17:15 -0400
commit480a25aaa804208d76cd362c9a6bd222ec66dee6 (patch)
tree7fae0a11735caab29e5c1106a243d7527b25e3d8 /src/Propellor/Property/Systemd.hs
parent1799f634d89f588eeaef6ff2f6226adf5add3389 (diff)
parent63d653ee19b0f1bf2f4115d9f4ae9a93b00bae90 (diff)
Merge branch 'joeyconfig'
Diffstat (limited to 'src/Propellor/Property/Systemd.hs')
-rw-r--r--src/Propellor/Property/Systemd.hs8
1 files changed, 4 insertions, 4 deletions
diff --git a/src/Propellor/Property/Systemd.hs b/src/Propellor/Property/Systemd.hs
index e44ef717..8194fc85 100644
--- a/src/Propellor/Property/Systemd.hs
+++ b/src/Propellor/Property/Systemd.hs
@@ -40,7 +40,7 @@ module Propellor.Property.Systemd (
bindRo,
) where
-import Propellor
+import Propellor.Base
import Propellor.Types.Chroot
import Propellor.Types.Container
import Propellor.Types.Info
@@ -62,8 +62,8 @@ data Container = Container MachineName Chroot.Chroot Host
deriving (Show)
instance PropAccum Container where
- (Container n c h) & p = Container n c (h & p)
- (Container n c h) &^ p = Container n c (h &^ p)
+ (Container n c h) `addProp` p = Container n c (h `addProp` p)
+ (Container n c h) `addPropFront` p = Container n c (h `addPropFront` p)
getProperties (Container _ _ h) = hostProperties h
-- | Starts a systemd service.
@@ -376,8 +376,8 @@ instance Publishable (Proto, Bound Port) where
--
-- > foo :: Host
-- > foo = host "foo.example.com"
--- > & Systemd.running Systemd.networkd
-- > & Systemd.nspawned webserver
+-- > `requires` Systemd.running Systemd.networkd
-- >
-- > webserver :: Systemd.container
-- > webserver = Systemd.container "webserver" (Chroot.debootstrapped (System (Debian Testing) "amd64") mempty)