From 2f82a87fd7f411b9f619e048c1b9b54de6126987 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Wed, 30 Mar 2016 11:30:11 -0400 Subject: refactor --- src/Propellor/Property/Systemd.hs | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/src/Propellor/Property/Systemd.hs b/src/Propellor/Property/Systemd.hs index e0b7d572..1e0c3f86 100644 --- a/src/Propellor/Property/Systemd.hs +++ b/src/Propellor/Property/Systemd.hs @@ -195,12 +195,13 @@ machined = withOS "machined installed" $ \w o -> -- > & ... container :: MachineName -> (FilePath -> Chroot.Chroot) -> Container container name mkchroot = - let c = Container name chroot (host name (containerProps chroot)) + let c = Container name chroot h in setContainerProps c $ containerProps c &^ resolvConfed &^ linkJournal where chroot = mkchroot (containerDir name) + h = host name (containerProps chroot) -- | Defines a container with a given machine name, with the chroot -- created using debootstrap. -- cgit v1.2.3