diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/Propellor/Property/Sbuild.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Propellor/Property/Sbuild.hs b/src/Propellor/Property/Sbuild.hs index cffe2f5f..048b5cf1 100644 --- a/src/Propellor/Property/Sbuild.hs +++ b/src/Propellor/Property/Sbuild.hs @@ -252,12 +252,12 @@ update = Apt.update `before` Apt.upgrade `before` Apt.autoRemove -- -- This property is standardly used when the host has 'Apt.useLocalCacher'. useHostProxy :: Host -> Property (HasInfo + DebianLike) -useHostProxy host = case getProxyInfo of +useHostProxy h = case getProxyInfo of Nothing -> doNothing Just (Apt.HostAptProxy u) -> Apt.proxy u where getProxyInfo :: Maybe Apt.HostAptProxy - getProxyInfo = fromInfoVal . fromInfo . hostInfo $ host + getProxyInfo = fromInfoVal . fromInfo . hostInfo $ h aptCacheLine :: String aptCacheLine = "/var/cache/apt/archives /var/cache/apt/archives none rw,bind 0 0" |