diff options
| author | Sean Whitton <spwhitton@spwhitton.name> | 2017-11-18 13:08:39 -0700 |
|---|---|---|
| committer | Sean Whitton <spwhitton@spwhitton.name> | 2017-11-18 13:08:39 -0700 |
| commit | d80c32d3e15163d9b54902982f23cac16b4dbdd8 (patch) | |
| tree | 4cc0d6f53e1da1a54844fd8d6ee1bbdf8585b2c5 /src | |
| parent | ab68426ab1cd4331b57e02af082a7e0541efc32f (diff) | |
fix name shadowing in Sbuild.useHostProxy
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" |