diff options
Diffstat (limited to 'src')
-rw-r--r-- | src/Propellor/Property/Chroot.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Propellor/Property/Chroot.hs b/src/Propellor/Property/Chroot.hs index 971fd8ba..1a2fd6c8 100644 --- a/src/Propellor/Property/Chroot.hs +++ b/src/Propellor/Property/Chroot.hs @@ -344,8 +344,8 @@ useHostProxy h = property' "use host's apt proxy" $ \w -> -- Note that we can't look at getProxyInfo outside the property, -- as that would loop, but it's ok to look at it inside the -- property. Thus the slightly strange construction here. - case getProxyInfo of + case getProxyInfo h of Just (Apt.HostAptProxy u) -> ensureProperty w (Apt.proxy' u) Nothing -> noChange where - getProxyInfo = fromInfoVal . fromInfo . hostInfo $ h + getProxyInfo = fromInfoVal . fromInfo . hostInfo |